arules子集在arules包的新版本(1.5-2)中不起作用

Question

我最近被一个规则包更新到了1.5-2版本，因为我不能从规则集中设置项目列表的子集，所以当我尝试子集"Error in structure(seq(length(labels))，names = labels)i : invalid subscript type 'S4'“时，我得到了以下错误

library(arules)
data("Groceries")

#generate Rules without second record to create an itemset
rules <- apriori(Groceries[-2],parameter = list(supp = 0.05, conf = 0.2,target = "rules"))

#Create an itemlist with second record
enter code here`basket <- Groceries[2]
rulesMatchLHS <- is.subset(rules@lhs,basket)
suitableRules <- rulesMatchLHS & !(is.subset(rules@rhs,basket))
#output
inspect(rules[suitableRules])

提前感谢

Answer 1

您的子集向量看起来像一个稀疏矩阵，但需要一个密集的逻辑向量：

suitableRules

7 x 1 sparse Matrix of class "lgCMatrix"
                   {tropical fruit,yogurt,coffee}
{}                                              |
{yogurt}                                        |
{whole milk}                                    .
{rolls/buns}                                    .
{whole milk}                                    .
{other vegetables}                              .
{whole milk}                                    .

as.logical(suitableRules)
[1]  TRUE  TRUE FALSE FALSE FALSE FALSE FALSE

inspect(rules[as.logical(suitableRules)])
    lhs         rhs          support   confidence lift     count
[1] {}       => {whole milk} 0.2555420 0.2555420  1.000000 2513 
[2] {yogurt} => {whole milk} 0.0560301 0.4018964  1.572722  551