R

时间:2019-03-03 19:36:16

标签: r apriori

我正在使用此代码

df_itemList<- read.csv('data.3.txt')

write.csv(df_itemList,"ItemList.csv", row.names = TRUE)

txn = read.transactions(file="ItemList.csv", rm.duplicates= TRUE, format="basket",sep=",",cols=1)

 basket_rules <- apriori(txn,parameter = list(sup = 0.01, conf = 0.5,target="rules"))

要对此数据enter image description here运行Apriori Alg

将其转换为df_itemList.CSV后看起来像这样

enter image description here

代码运行良好,并为包含99条记录(行)的数据集生成了约29000条规则

但是我的数据有(10000条记录)

对于任何具有101条或更多记录的数据集,代码将在毫秒内执行,并且仅给出4条毫无意义的规则.....

然后我在控制台中收到此回复

enter image description here

我的问题是:如何在更大的数据集(超过99条记录)上运行Apriori Alg。 还是为什么我的代码不适用于更大的数据集?

0 个答案:

没有答案