使用arules包write()函数时交易项意外显示为因子ID的问题

这个问题我之前也碰到过！核心原因是你用split()得到的交易列表里，每个商品项都是因子类型——R默认会把字符串列转成因子，而arules的write()函数在处理因子时，输出的是它底层的整数编码ID，而不是我们要的商品名称文本。给你几个靠谱的解决方案：

方法1：导入数据时直接避免列转为因子 #

在read.csv()里加上stringsAsFactors = FALSE参数，让字符串列保持字符类型，后续split后自然就是商品名称：

# 导入CSV时禁用自动转因子
trans <- read.csv("MyFile.csv", header = TRUE, sep = ";", stringsAsFactors = FALSE)
# 拆分交易列表
TransList <- split(trans[,"ItemNames"], trans[,"TransactionID"])
# 写入交易数据
library(arules)
write(TransList, file = "output_transactions.txt")

方法2：转换已有的因子列表为字符向量 #

如果已经完成了数据导入和split操作，也可以用lapply()把每个因子向量转换成字符向量：

# 将因子列表转为字符列表
TransList <- lapply(TransList, as.character)
# 再执行写入
library(arules)
write(TransList, file = "output_transactions.txt")

方法3：使用arules专用的交易数据读取函数 #

更推荐的方式是直接用arules包的read.transactions()，它专门为交易数据设计，能直接从CSV生成交易对象，省去手动split的步骤，还能自动处理因子问题：

library(arules)
# 直接读取交易数据，指定格式为"single"（每行一个交易-商品对）
trans <- read.transactions("MyFile.csv", sep = ";", format = "single", 
                           cols = c("TransactionID", "ItemNames"))
# 写入交易数据
write(trans, file = "output_transactions.txt")

这个方法不仅能解决因子问题，还能自动处理同一交易中的重复商品项（默认去重，可通过rm.duplicates参数调整），更适合关联规则分析的场景。

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