Transactions R-将交易格式数据集转换为篮子格式,用于市场篮子分析

Transactions R-将交易格式数据集转换为篮子格式,用于市场篮子分析,transactions,market-basket-analysis,Transactions,Market Basket Analysis,首先,我想澄清一下,在发布这个问题之前,我已经参考了这个网站上的以下链接来寻找答案,但我不明白,可能是因为它们解决了不同的问题,或者因为我是R 我想用我的数据集进行市场篮子分析。我的数据集是如下所述的事务格式,我想将其转换为如下所述的篮子格式 我的输入文件是一个csv文件,数据集的事务格式如下: TransactionID ProductID A 1 A 2 B 1 C 3 A

首先,我想澄清一下,在发布这个问题之前,我已经参考了这个网站上的以下链接来寻找答案,但我不明白,可能是因为它们解决了不同的问题,或者因为我是R

我想用我的数据集进行市场篮子分析。我的数据集是如下所述的事务格式,我想将其转换为如下所述的篮子格式

我的输入文件是一个csv文件,数据集的事务格式如下:

TransactionID ProductID
A              1
A              2
B              1
C              3
A              4
B              3
1 2 4
1 3
3
我希望我的输出文件是一个csv文件,格式如下:

TransactionID ProductID
A              1
A              2
B              1
C              3
A              4
B              3
1 2 4
1 3
3
其中{1,2,4}是在交易A中购买的产品,{1,3}是在交易B中购买的产品,依此类推

你能告诉我做这个的R码吗?我尝试使用以下代码,但不起作用。我的输入文件名为D01\u modified1.csv

library(arulesSequences)
# Read CSV into R
MyData <- read.csv(file="D01_modified1.csv", header=TRUE, sep=",")
s <- unique(MyData,incomparables = FALSE, fromLast = FALSE,paste0("ProductID"))
# Write CSV in R
write.csv(s, file = "MyOutput.csv",row.names=FALSE, na="")
我也不确定下面的代码是否会给我想要的输出

s <- unique(MyData,incomparables = FALSE, fromLast = FALSE,paste0("ProductID"))
请导游。期待您的帮助。非常感谢

这对我很管用

df_fact <- data.frame(lapply(MyData,as.factor))
df_trans <- as(df_fact, 'transactions')
希望能有帮助