r - dimnames(x) <- dn 中的错误：“dimnames”[2] 的长度不等于使用 rCBA::fpgrowth 的数组范围错误

Question

我有以下数据集，我想使用 FP 增长为其生成关联规则

> head(order_pairs)
# A tibble: 6 x 2
  product_A          product_B                       
  <chr>              <chr>                           
1 Organic Egg Whites Michigan Organic Kale           
2 Organic Egg Whites Garlic Powder                   
3 Organic Egg Whites Coconut Butter                  
4 Organic Egg Whites Natural Sweetener               
5 Organic Egg Whites Carrots                         
6 Organic Egg Whites Original Unflavored Gelatine Mix

按照此处文档中的示例，我在生成规则之前执行了以下步骤。

train = sapply(orders_pairs,as.factor)
train = as.data.frame(train, check.names = FALSE)
transactions = as(train, 'transactions')
rules = rCBA::fpgrowth(transactions, support=0.01, confidence=0.01, maxLength=2, consequent="product_B", parallel=FALSE)

> head(train)
           product_A                        product_B
1 Organic Egg Whites            Michigan Organic Kale
2 Organic Egg Whites                    Garlic Powder
3 Organic Egg Whites                   Coconut Butter
4 Organic Egg Whites                Natural Sweetener
5 Organic Egg Whites                          Carrots
6 Organic Egg Whites Original Unflavored Gelatine Mix

一点阅读使我发现该错误与具有有效列名的结果参数有关。但是“product_B”是我数据中的有效列名

> colnames(orders_pairs)
[1] "product_A" "product_B"

> colnames(train)
[1] "product_A" "product_B"