我正在使用apriori函数创建商品推荐系统。我已经成功使用以下方法创建了规则:
tr <- read.transactions("itemList.csv", format = 'basket', sep=',')
rules <- apriori(tr, parameter = list(supp=0.01, conf=0.8))
rules <- sort(rules, by='confidence', decreasing = TRUE)
其中一项规则是{蛋} => {牛奶}
现在,如果要放入鸡蛋,我需要某种可以打印牛奶的函数。
> function(rules,'eggs')
'milk'
答案 0 :(得分:1)
软件包recommenderlab
可以根据以arules
挖掘的关联规则来产生推荐。