在R中为事务数据添加层级时遇标签列数不匹配错误求助

问题根源 #

你遇到的「标签与列数不匹配」错误，核心原因是：

• 赋值给itemInfo(trans5)的DataFrame行数，和trans5中唯一商品的数量（nitems(trans5)）不一致
• 或者labels列的内容、顺序和trans5的itemLabels不匹配

分步解决方案 #

1. 创建唯一的商品-层级映射表 #

从原始数据集stores2中生成无重复的产品与对应层级的映射表，确保每个产品只对应一条层级记录：

# 生成唯一的商品-类别映射
item_hierarchy <- unique(stores2[, c("Product.Name", "Sub.Category", "Category")])
# 重命名列，对齐Groceries的itemInfo格式
colnames(item_hierarchy) <- c("labels", "level2", "level1")

2. 对齐事务对象的商品标签顺序 #

trans5的itemLabels是事务中所有唯一商品的有序列表，需要把映射表的顺序和这个列表完全对齐：

# 获取trans5的所有商品标签
trans_labels <- itemLabels(trans5)
# 按trans_labels的顺序重新排序映射表
item_info <- item_hierarchy[match(trans_labels, item_hierarchy$labels), ]

3. 为事务对象设置itemInfo #

此时item_info的行数等于nitems(trans5)，且labels顺序完全匹配，可安全赋值：

# 赋值给trans5的itemInfo
itemInfo(trans5) <- item_info
# 验证结果
head(itemInfo(trans5))

关键注意事项 #

• 确保item_hierarchy中没有重复的labels（即每个产品只出现一次），否则match会返回多个结果导致错误
• 检查nrow(item_info)是否等于nitems(trans5)，如果不等，说明原始数据中存在事务里的商品不在映射表中，需要排查数据一致性问题
• 若原始数据的Category是数字（如1、2），可转换成有意义的名称方便分析：

  item_info$level1 <- factor(item_info$level1, levels = c(1,2,3), labels = c("类别A", "类别B", "类别C"))
  

验证转换结果 #

完成后用以下命令确认结构是否符合预期：

# 查看事务对象基本信息
summary(trans5)
# 查看itemInfo前几行
head(itemInfo(trans5))

这样就能得到和Groceries数据集一致的itemInfo结构，顺利进行多层次关联规则挖掘。

内容的提问来源于stack exchange，提问作者Michal Jeznach