1、安装并加载程序包arules和rattle，可以使用代码，也可以直接在R软件菜单栏安装和加载。install.packages("arules")install.packages("rattle")library(arules)library(rattle)
3、关联规则需要的数据为transactions形式，可以看到返回的结果是10行7列的数据。##转换数据集Sales_trans<- as(split(Sales$goods,Sales$ID),"transactions")Sales_trans
5、查看模型结果。summary(Sales_apriori_model)
