子集根据事务长度arules事务对象

Question

任何人都知道如何根据事务长度来子集和arules事务对象？

例如：

library(arules)
data(Adult)
summary(Adult)

我想根据每笔交易的长度将Adult子集到不同的交易对象中。

Answer 1

我建议首先看一下包帮助。 'help.start（）'。导航到包并花点时间查看为包实现了哪些方法。

花了一分钟时间才发现事务对象有一个size（）和subset（）实现。所以你很容易做到你要求的。

以下是我将如何做到这一点：

#you can get a vector of the sizes of the transactions:
sizes<-size(Adult)
#If you want to automate the sunsetting with a for loop 
#you can save which sizes are.
size.labels<-as.numeric(levels(as.factor(sizes)))
#Now you just need to use subset() function for 
#arules using size as condition. 
#Here few examples
Adult.subset<-subset(Adult,sizes==size.labels[1]) #this for using in a loop maybe?
Adult.subset.10<-subset(Adult,sizes==10)
...

希望它可以帮到你！