- library(arules) #加載arules程序包
- data(Groceries) #調用數據文件
- frequentsets=eclat(Groceries,parameter=list(support=0.05,maxlen=10)) #求頻繁項集
- inspect(frequentsets[1:10]) #察看求得的頻繁項集
- inspect(sort(frequentsets,by="support")[1:10]) #根據支持度對求得的頻繁項集排序並察看(等價於inspect(sort(frequentsets)[1:10])
- rules=apriori(Groceries,parameter=list(support=0.01,confidence=0.01)) #求關聯規則
- summary(rules) #察看求得的關聯規則之摘要
- x=subset(rules,subset=rhs%in%"whole milk"&lift>=1.2) #求所需要的關聯規則子集
- inspect(sort(x,by="support")[1:5]) #根據支持度對求得的關聯規則子集排序並察看
library(arules) #加載arules程序包
data(Groceries) #調用數據文件
frequentsets=eclat(Groceries,parameter=list(support=0.05,maxlen=10)) #求頻繁項集
inspect(frequentsets[1:10]) #察看求得的頻繁項集
inspect(sort(frequentsets,by="support")[1:10]) #根據支持度對求得的頻繁項集排序並察看(等價於inspect(sort(frequentsets)[1:10])
rules=apriori(Groceries,parameter=list(support=0.01,confidence=0.01)) #求關聯規則
summary(rules) #察看求得的關聯規則之摘要
x=subset(rules,subset=rhs%in%"whole milk"&lift>=1.2) #求所需要的關聯規則子集
inspect(sort(x,by="support")[1:5]) #根據支持度對求得的關聯規則子集排序並察看