r - 如何从 apriori R(关联规则)中提取信息

Question

我正在 R 中进行一些关联规则挖掘并想提取我的结果以便我可以构建报告
我的结果是这样的:

> inspect(rules[1:3])
  lhs          rhs                         support confidence lift
1 {apples} => {oranges}                    0.00029       0.24  4.4
2 {apples} => {pears}                      0.00022       0.18 45.6
3 {apples} => {pineapples} 0.00014         0.12  1.8

我如何在这里提取“rhs”，即橙子、梨和菠萝的载体

此外，我如何从摘要中提取信息，即

> summary(rules)

数据类型是“s4”，当输出在列表中时提取没有问题等等。你如何做等价的？
3条规则

rule length distribution (lhs + rhs):sizes
2 
3 

   Min. 1st Qu.  Median    Mean 3rd Qu.    Max. 
      2       2       2       2       2       2 

我想从“3条规则集”中提取“3”

我已经使用“@”
What does the @ symbol mean in R?

但是一旦我使用它，我如何将我的结果变成一个向量，即

inspect(rules@rhs)
1 {oranges}
2 {pears}
3 {pineapples}

成为长度为 3 的字符向量

Answer 1

回答您的第二个问题:length(rules)
现在关于你的第一个问题:

library("arules")
data("Adult")
## Mine association rules.
rules <- apriori(Adult,parameter = list(supp = 0.5, conf = 0.9, target = "rules"))
summary(rules)

l = length(rules)

everything = labels(rules)
#print(everything)

cut = unlist(strsplit(everything,"=> "))[seq(2,2*l,by=2)]
print(cut)

如果您有问题，请不要犹豫，这可能有点密集:-)