2

我正在分析来自在线商店的数据。我已经计算了所有项目的“itemFrequencyPlot”，现在我想取出最常销售的前 5 个项目并将它们绘制在同一个图表中。我尝试了一些事情但没有成功:(

例如，这就是我如何在不同的图表中绘制 2 个项目。

#Sales time series per Month for 85123A
data85123A <- data[data$StockCode == "85123A", ]
timeseries85123A <- split(data85123A$Month, data85123A$InvoiceNo)  # Convert data in the list
timeseries85123A <- as(timeseries85123A,"transactions") # Convert dates to transcriptions
itemFrequencyPlot(timeseries85123A,type="absolute", main="Sales time series per Month for 85123A",
                  xlab="Month", ylab="Amount of Sales")

#Sales time series per Month for 22423
data22423 <- data[data$StockCode == "22423", ]
timeseries22423 <- split(data22423$Month, data22423$InvoiceNo)  # Convert data in the list
timeseries22423 <- as(timeseries22423,"transactions") # Convert dates to transcriptions
itemFrequencyPlot(timeseries22423,type="absolute", main="Sales time series per Month for 22423",
                  xlab="Month", ylab="Amount of Sales")
4

0 回答 0