arulesViz 下标越界副坐标

arulesViz subscript out of bounds paracoord

我想执行篮子分析并绘制副坐标图,但收到错误消息。

此错误的内容是:

Error in m[j, i] : subscript out of bounds.In addition: Warning message:
In cbind(pl, pr) :
number of rows of result is not a multiple of vector length (arg 2)

我使用的数据来自:Link

首先我将其转换为适合篮子分析,原始 excel 文件的名称是 Online_Retail:

library(arules)
library(arulesViz)
library(plyr)
items <- ddply(Online_Retail, c("CustomerID", "InvoiceDate"),             function(df1)paste(df1$Description, collapse = ","))
items1 <- items["V1"]
write.csv(items1, "groceries1.csv", quote=FALSE, row.names = FALSE, col.names = FALSE)

trans1 <- read.transactions("groceries1.csv", format = "basket", sep=",",skip=1)

为了绘制辅助坐标,我创建了这样的代码:

rules.trans2<-apriori(data=trans1, parameter=list(supp=0.001,conf = 0.05), 
                  appearance=list(default="rhs", lhs="ROSES REGENCY TEACUP AND SAUCER"), control=list(verbose=F)) 

sorted.plot <- sort(rules.trans2, by="support", decreasing = TRUE)
plot(sorted.plot, method="paracoord", control=list(reorder=TRUE, verbose = TRUE))

为什么我的辅助坐标代码不起作用?我该如何解决?我应该改变什么?

不幸的是,这是 arulesViz 中的一个错误。这将在下一个版本 (arulesViz 1.3-3) 中修复。 GitHub 的开发版本中已提供该修复程序:https://github.com/mhahsler/arulesViz