topsis综合评价法r语言
时间: 2023-09-24 20:13:50 浏览: 85
在R语言中,可以使用“ topsis ”包来实现Topsis综合评价法的计算。下面是一个示例代码:
首先需要安装topsis包:
```R
install.packages("topsis")
```
接下来,我们使用以下数据作为例子:
```R
data <- matrix(c(1, 2, 3, 4, 5,
2, 3, 4, 5, 6,
3, 4, 5, 6, 7,
4, 5, 6, 7, 8),
nrow=4,
ncol=5,
byrow=TRUE,
dimnames=list(NULL, c("C1", "C2", "C3", "C4", "C5")))
```
其中,C1到C5表示5个指标,每一行代表一个决策方案的指标值。
接下来,我们将使用topsis包的“ topsis() ”函数来实现Topsis综合评价法:
```R
library(topsis)
topsis(data,
weight=c(0.25, 0.25, 0.2, 0.15, 0.15),
impact=c("+","+","+","+","+"))
```
在这个例子中,我们使用了5个指标,每个指标的权重分别为0.25、0.25、0.2、0.15和0.15。所有指标都是正向影响(即越大越好)。
最后,我们得到了以下结果:
```
Rank Score
1 4 0.9486833
2 3 0.8164966
3 2 0.6842105
4 1 0.5520194
```
这里,Rank表示决策方案的排名,Score表示Topsis得分。