创建自己的模糊标度

问题描述

我正在Rda尝试学习模糊ahp。我正在尝试定义自己的模糊标度。我为此创建了一个函数。但是，当我要使用自己的秤时，我在哪里做错了以下错误？我查看了来自github的源代码，并将带有代码的链接添加到疫苗中。

https://github.com/prenses95/Fuzzyahp/blob/master/R/function-getFuzzyScale.R

我创建的功能

deFinition = function (fuzzyScale)
+ {
+ if (fuzzyScale == "myscale") {
+ Scale = as.double (c (1 / 2,1,7,+ 1,2,8,+ 2,9,4,+ 3,5,+ 4,6,+ 5,+ 6,+ 7,+ 8,9))
+}
+
+
+
+ Scale = matrix (data = Scale,nrow = length (Scale) / 3,ncol = 3,byrow = TRUE)
+ return (Scale)
+}

required function to use
> fuzzyComparisonMatrix = fuzzyPairwiseComparisonMatrix (comparisonMatrix,fuzzyScale = myscale)
error
Error in fnMin [i,j] <- fuzzyScale [number,1]: the number of items to replace is not a multiple of the length of the replacement

解决方法

暂无找到可以解决该程序问题的有效方法，小编努力寻找整理中！

如果你已经找到好的解决方法，欢迎将解决方案带上本链接一起发送给小编。

小编邮箱:dio#foxmail.com (将#修改为@）