R : 使用 arule 从 Bond 中下标
R : Subscript out of Bond using arule
我正在使用 arules 包,并在寻找规则我遇到了这个问题:
注意:txn 是我的交易矩阵
你可以在这里下载我的 CSV
将 csv 文件转换为购物篮格式
library(arules)
txn = read.transactions(file="ItemList.csv", rm.duplicates= FALSE, format="basket",sep=",",cols=1);
从交易中删除报价
txn@itemInfo$labels <- gsub("\"","",txn@itemInfo$labels)
rules <- apriori(txn,
parameter = list(support=.001,
confidence=.5,
minlen=2,
target='rules' # to mine for rules
))
>summary(rules)
... etc
> inspect(sort(rules, by='lift', decreasing = T)[1:5])
Error in slot(x, s)[i] : subscript out of bounds
最后,我的错误是
slot(x, s)[i] 出错:下标越界
我在网上看到我的问题不应该来自 "wrong code",而是来自 R 设置。
谢谢大家的帮助!
刚解决。在规则中设置 Support=0.00001 使一切正常
rules <- apriori(txn,
parameter = list(support=.00001,
confidence=.5,
minlen=2,
target='rules' # to mine for rules
))
我正在使用 arules 包,并在寻找规则我遇到了这个问题:
注意:txn 是我的交易矩阵
你可以在这里下载我的 CSV
将 csv 文件转换为购物篮格式
library(arules)
txn = read.transactions(file="ItemList.csv", rm.duplicates= FALSE, format="basket",sep=",",cols=1);
从交易中删除报价
txn@itemInfo$labels <- gsub("\"","",txn@itemInfo$labels)
rules <- apriori(txn,
parameter = list(support=.001,
confidence=.5,
minlen=2,
target='rules' # to mine for rules
))
>summary(rules)
... etc
> inspect(sort(rules, by='lift', decreasing = T)[1:5])
Error in slot(x, s)[i] : subscript out of bounds
最后,我的错误是
slot(x, s)[i] 出错:下标越界
我在网上看到我的问题不应该来自 "wrong code",而是来自 R 设置。 谢谢大家的帮助!
刚解决。在规则中设置 Support=0.00001 使一切正常
rules <- apriori(txn,
parameter = list(support=.00001,
confidence=.5,
minlen=2,
target='rules' # to mine for rules
))