[R] arules package question- apriori/S4 object export question

[johnistan]

I am new to R( but quickly being awed by the range of this it can accomplish,
you have one more convert to the useR universe). I have successfully
implemented the apriori function and are getting great results. My question
concerns how to export these results. I have read lots about write.csv
functions and exporting data frames and other standard objects. Im having
difficulty working with these S4 objects. My object looks as follows.


> str(rules)
Formal class 'rules' [package "arules"] with 4 slots
  ..@ lhs    :Formal class 'itemMatrix' [package "arules"] with 3 slots
  .. .. ..@ data       :Formal class 'ngCMatrix' [package "Matrix"] with 5
slots
  .. .. .. .. ..@ i       : int [1:2133] 3907 3519 4172 3519 4182 3519 4172
4182 4172 4182 ...
  .. .. .. .. ..@ p       : int [1:790] 0 0 1 2 3 4 5 6 7 8 ...
  .. .. .. .. ..@ Dim     : int [1:2] 7002 789
  .. .. .. .. ..@ Dimnames:List of 2
  .. .. .. .. .. ..$ : NULL
  .. .. .. .. .. ..$ : NULL
  .. .. .. .. ..@ factors : list()
  .. .. ..@ itemInfo   :'data.frame':   7002 obs. of  1 variable:
  .. .. .. ..$ labels:Class 'AsIs'  chr [1:7002] "0171T_722.52"
"0171T_724.02" "0172T_724.02" "0197T_185" ...
  .. .. ..@ itemsetInfo:'data.frame':   0 obs. of  0 variables
  ..@ rhs    :Formal class 'itemMatrix' [package "arules"] with 3 slots
  .. .. ..@ data       :Formal class 'ngCMatrix' [package "Matrix"] with 5
slots
  .. .. .. .. ..@ i       : int [1:789] 4120 3704 4172 3519 4182 3519 4120
4182 4172 4120 ...
  .. .. .. .. ..@ p       : int [1:790] 0 1 2 3 4 5 6 7 8 9 ...
  .. .. .. .. ..@ Dim     : int [1:2] 7002 789
  .. .. .. .. ..@ Dimnames:List of 2
  .. .. .. .. .. ..$ : NULL
  .. .. .. .. .. ..$ : NULL
  .. .. .. .. ..@ factors : list()
  .. .. ..@ itemInfo   :'data.frame':   7002 obs. of  1 variable:
  .. .. .. ..$ labels:Class 'AsIs'  chr [1:7002] "0171T_722.52"
"0171T_724.02" "0172T_724.02" "0197T_185" ...
  .. .. ..@ itemsetInfo:'data.frame':   0 obs. of  0 variables
  ..@ quality:'data.frame':     789 obs. of  3 variables:
  .. ..$ support   : num [1:789] 0.8258 0.0103 0.0102 0.0102 0.0102 ...
  .. ..$ confidence: num [1:789] 0.826 1 0.987 0.925 0.987 ...
  .. ..$ lift      : num [1:789] 1 50.8 89.6 89.6 89.6 ...
  ..@ info   :List of 4
  .. ..$ data         : symbol lij_trans
  .. ..$ ntransactions: int 7266
  .. ..$ support      : num 0.01
  .. ..$ confidence   : num 0.7

and sample inspect statement:

95  {93510_411.1,
     93556_411.1}  => {93010_414.9}  0.01279934  1.0000000  1.21100
96  {93010_414.9,
     93510_411.1}  => {93556_411.1}  0.01279934  0.9687500 69.00919
97  {93010_414.9,
     93556_411.1}  => {93510_411.1}  0.01279934  0.9117647 69.00919
98  {93543_413.9,
     93555_413.9}  => {93556_413.9}  0.01541426  1.0000000 60.55000
99  {93543_413.9,
     93556_413.9}  => {93555_413.9}  0.01541426  1.0000000 64.87500
100 {93555_413.9,
     93556_413.9}  => {93543_413.9}  0.01541426  1.0000000 64.87500
101 {93543_413.9,
     93555_413.9}  => {93545_413.9}  0.01541426  1.0000000 60.04959



What is am most interested in is exporting to a csv or some form of table.
Where the 1,2 or n transactions on the left are listed in c(1,2,...n) and
the dependent data point is in c(4 or n+1)(I have limited the max number to
three) and the support/conf/lift is the next tree columns. 

something like:

 93543_413.9 | 93555_413.9 | 93545_413.9 |  0.01541426 |  1.0000000 |
60.04959

I have searched around but haven't found anything. Can someone help or
supply some more promising search terms to direct my dive into
documentation.


Thanks, 

John








-- 
View this message in context: http://r.789695.n4.nabble.com/arules-package-question-apriori-S4-object-export-question-tp3245205p3245205.html
Sent from the R help mailing list archive at Nabble.com.