R语言 关联规则
2015-06-21 12:51
393 查看
#install.packages("arules")
library(Matrix)
library(arules) #加载arules程序包
guanlian<-read.table(file="relation.txt",header=TRUE) #从文本读数据到数据框
for (i in 1:length(guanlian))
{
guanlian[,i]<-as.factor(guanlian[,i])
}
str(guanlian)
frequentsets=eclat(guanlian,parameter=list(support=0.01,maxlen=10))#求频繁项集
inspect(frequentsets[1:100]) #察看求得的频繁项集
inspect(sort(frequentsets,by="support")[1:10])#根据支持度对求得的频繁项集排序并察看(等价于inspect(sort(frequentsets)[1:10])
rules=apriori(guanlian,parameter=list(support=0.01,confidence=0.01))#求关联规则
inspect(sort(rules,by="support")[1:10])
summary(rules) #察看求得的关联规则之摘要
x=subset(rules,subset=rhs%in%"assess=好评"&lift>=1.18)#求所需要的关联规则子集
inspect(sort(x,by="support")) #根据支持度对求得的关联规则子集排序并察看
y=subset(rules,subset=rhs%in%"assess=差评"&lift>=2.4)#求所需要的关联规则子集
inspect(sort(y,by="support")) #根据支持度对求得的关联规则子集排序并察看
z=subset(rules,subset=rhs%in%"assess=中评"&lift>=1.8)#求所需要的关联规则子集
inspect(sort(z,by="support")) #根据支持度对求得的关联规则子集排序并察看
library(Matrix)
library(arules) #加载arules程序包
guanlian<-read.table(file="relation.txt",header=TRUE) #从文本读数据到数据框
for (i in 1:length(guanlian))
{
guanlian[,i]<-as.factor(guanlian[,i])
}
str(guanlian)
frequentsets=eclat(guanlian,parameter=list(support=0.01,maxlen=10))#求频繁项集
inspect(frequentsets[1:100]) #察看求得的频繁项集
inspect(sort(frequentsets,by="support")[1:10])#根据支持度对求得的频繁项集排序并察看(等价于inspect(sort(frequentsets)[1:10])
rules=apriori(guanlian,parameter=list(support=0.01,confidence=0.01))#求关联规则
inspect(sort(rules,by="support")[1:10])
summary(rules) #察看求得的关联规则之摘要
x=subset(rules,subset=rhs%in%"assess=好评"&lift>=1.18)#求所需要的关联规则子集
inspect(sort(x,by="support")) #根据支持度对求得的关联规则子集排序并察看
y=subset(rules,subset=rhs%in%"assess=差评"&lift>=2.4)#求所需要的关联规则子集
inspect(sort(y,by="support")) #根据支持度对求得的关联规则子集排序并察看
z=subset(rules,subset=rhs%in%"assess=中评"&lift>=1.8)#求所需要的关联规则子集
inspect(sort(z,by="support")) #根据支持度对求得的关联规则子集排序并察看
相关文章推荐
- 【读书笔记:C++ primer plus 第六版 中文版】第4章 复合类型
- git和github的代码托管常用命令和操作
- [leetcode] Palindrome Partitioning
- 图说java反射 建议将图下载,用画图打开
- 哪些东西不适合放到数据库
- uva11389巴士司机问题(贪心水题)
- java 接口里暴露函数
- 《人,绩效和职业道德》读后感想
- iOS阶段学习第三天笔记(运算符)
- 纯CSS3实现的表单输入高亮效果
- js三个关键对象(运行期)
- 关于linux依赖关系出错的解决
- 一个星期自动态的网站设计
- HTML5之Local Storage
- MIT评选出的全球最聪明的50个公司-完整名单(附带往年名单)!
- PostgreSQL安装日志
- linux下安装unity web player的方法
- Android学习第四课:Java代码实现XML布局
- JavaWeb:Tomcat下配置数据源连接数据库
- 面向对象的方式进行数据交换网络之间的差异--无缝切换的发展到单机游戏C/S模式