所以我已经完成了规则模型,并得到了不同项目的规则列表。要查找规则是否包含lhs或rhs中的特定项,代码如下:rules.sub <- subset(rules, subset = items %in% "item_to_match")
。
然而,我的目标不是找到一个特定的项目,而是匹配来自单独csv的项目列表并找到包含它们的所有规则。我该怎么做呢?
UPD:据我所知,可以通过子集方法来实现。然而,最终的代码应该有点不同。如果您指定了不在列表中的某些项,则子集方法会抛出错误,但可以通过以下代码绕过它:
1)创建find results函数:fn_findRules <- function(rules, newBasket){ arules<-subset(rules, items %in% newBasket) return (arules) }
(感谢@lukeA,来源)
2)使用已定义的函数创建带有results的变量resuslts <- fn_findRules(rules, intersect(itemLabels(rules), table_with_items_to_check))