require(pmr)
abc <- matrix(data = 1:15, nrow = 4, ncol = 4, byrow = TRUE)
abc[1,1] <- 1
abc[1,2] <- 2
abc[1,3] <- 5
abc[1,4] <- 4
abc[2,1] <- 1/2
abc[2,2] <- 1
abc[2,3] <- 3
abc[2,4] <- 1.9
abc[3,1] <- 1/5
abc[3,2] <- 1/3
abc[3,3] <- 1
abc[3,4] <- 0.7
abc[4,1] <- 1/4
abc[4,2] <- 1/1.9
abc[4,3] <- 1/0.7
abc[4,4] <- 1
## compute the weights, Saaty's and Koczkodaj's inconsistencies
ahp(abc)
错误: 没有"ahp"这个函数
而输入ahp还有代码提示,ahp(dset, sim_size=500),怎么回事呢?