'predict' 使用先验 [r] 创建的规则

Question

我正在使用先验函数创建项目推荐系统。我已使用以下方法成功创建规则：

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)

规则之一是{eggs} => {milk}

现在我想要某种打印 milk 的函数，如果我输入 eggs。

> function(rules,'eggs')

     'milk'

Answer 1

包 recommenderlab 可以根据使用 arules 挖掘的关联规则生成推荐。

'predict' 使用先验 [r] 创建的规则

'predict' using rules created by apriori [r]

r

apriori