R-使用Arules稀疏矩阵输出作为另一个软件包的输入

Question

我使用arules从交易数据中构建稀疏矩阵并获得了一些不错的规则。现在，我想将此矩阵用作市场篮分析的输入。显然，可以将ItemMatrix类胁迫到NCGMATRIX类中供其他软件包，但我不确定如何使用。任何帮助将不胜感激。

原始数据从每个客户(DWID(购买了多个项目

dwid    Product.Colorblind
310975  Candy
310975  Fake doodie
310975  House slippers
310975  Canadian flags
310975  Ham
310990  Fake doodie
310990  Candy
310990  Turtle food

我将其读为交易数据并找到了一些不错的规则。

dataset <- read.transactions(file="Just Colorblind.csv",format="single",sep=",",cols=c("dwid","Product.Colorblind"),rm.duplicates=TRUE)
summary(dataset)
itemFrequencyPlot(dataset, topN = 40)
rules <- apriori(data = dataset, parameter = list(minlen = 2, support = 0.005, confidence = 0.1))

现在，我只是想从规则对象中制作出稀疏的矩阵

binary_activity_matrix <- as(rules.itemMatrix, "ngCMatrix")

有什么想法？

Answer 1

规则对象包含两个稀疏矩阵，一个用于LHS，一个用于RHS。您有以下选项：

as(lhs(rules.itemMatrix), "ngCMatrix")
as(rhs(rules.itemMatrix), "ngCMatrix")
as(items(rules.itemMatrix), "ngCMatrix")

items产生LHS和RHS的结合。请参阅? rules了解这些方法。