关联规则transaction数据准备

假设有如下data.frame，一行是一个购物篮；color，effect，smell，use,price是五种商品，如果是TRUE则表示篮子中有该商品，FALSE就是没有





那么请问这样的data.frame怎么转换成关联分析那种transaction数据呢？

1. > library(arules)
   
2. > data <- data.frame(color=c(T,T,F,F,T),shape=c(T,F,F,T,F),size=c(F,F,T,T,T))
   
3. > data
   
4.   color shape  size
   
5. 1  TRUE  TRUE FALSE
   
6. 2  TRUE FALSE FALSE
   
7. 3 FALSE FALSE  TRUE
   
8. 4 FALSE  TRUE  TRUE
   
9. 5  TRUE FALSE  TRUE
   
10. > dlist <- apply(data,1,function(x) colnames(data)[unlist(x,use.names=F)])
    
11. > dlist
    
12. [[1]]
    
13. [1] "color" "shape"
    
14. 
    
15. [[2]]
    
16. [1] "color"
    
17. 
    
18. [[3]]
    
19. [1] "size"
    
20. 
    
21. [[4]]
    
22. [1] "shape" "size"
    
23. 
    
24. [[5]]
    
25. [1] "color" "size"
    
26. 
    
27. > trans <- as(dlist,"transactions")
    
28. > inspect(trans)
    
29.   items        
    
30. 1 {color,shape}
    
31. 2 {color}      
    
32. 3 {size}      
    
33. 4 {shape,size}
    
34. 5 {color,size}

复制代码

把数据集转成矩阵或list
然后as(dataset name,"transactions")就可以了

万人往LVR 发表于 2016-6-28 20:38

你好~我也遇到了这个问题，但是在编写代码的时候我的dlist里面全部都是一样的数字了，请问怎么能够变成正常的transaction的形式呢？