apriori获取所有项目的列表出现在rhs（最好的频率）

Question

我希望在apriori的rhs中有一个项目名称列表，其中包含多少个规则

例如，我们可以使用数据（Groceries）

```
rules <- apriori (Groceries, 
              parameter = list(supp = 0.001, conf = 0.5)
              ) 
```

如何找到完整的项目列表是如何在本规则中的rhs列表。如果我们还可以在与每个项目相关的“规则”中有多少规则将是最好的，那么项目频率不是有多少规则具有rhs ='item'，例如

{全脂牛奶} 2345 {roll / buns} 5 .......

Answer 1

以下代码通过将RHS转换为（稀疏）0-1矩阵并对每行（项）的1进行求和来计算RHS中每个唯一项的规则数。

library(arules)
data(Groceries)
rules <- apriori (Groceries, parameter = list(supp = 0.001, conf = 0.5))

rowSums(as(rhs(rules), "ngCMatrix"))