Question 2a)
I am also working with arules package and I have the following problem
let suppose the matrix b like:
b<-matrix(c(1,1,1,1,1,1,0,0,1,1,1,1,0,0,1,1,0,1,1,1,1,1,1,1),nrow=6)
rownames(b)=c("T1", "T2", "T3", "T4", "T5", "T6")
colnames(b)=c("It1", "It2", "It3", "It4")
bt<-as(b, "transactions")
rules<-apriori(bt, parameter = list(maxlen=2))
k<-inspect(rules)
k
##we obtain
  lhs      rhs     support confidence lift
1 {}    => {It4} 1.0000000          1  1.0
2 {}    => {It1} 1.0000000          1  1.0
3 {It3} => {It2} 0.5000000          1  1.5
4 {It3} => {It4} 0.5000000          1  1.0
5 {It3} => {It1} 0.5000000          1  1.0
6 {It2} => {It4} 0.6666667          1  1.0
7 {It2} => {It1} 0.6666667          1  1.0
8 {It4} => {It1} 1.0000000          1  1.0
9 {It1} => {It4} 1.0000000          1  1.0

WRITE(rules)
##we obtain
"rules" "support" "confidence" "lift"
"1" "{} => {It4}" 1 1 1
"2" "{} => {It1}" 1 1 1
"3" "{It3} => {It2}" 0.5 1 1.5
"4" "{It3} => {It4}" 0.5 1 1
"5" "{It3} => {It1}" 0.5 1 1
"6" "{It2} => {It4}" 0.666666666666667 1 1
"7" "{It2} => {It1}" 0.666666666666667 1 1
"8" "{It4} => {It1}" 1 1 1
"9" "{It1} => {It4}" 1 1 1
I want to convert this in a matrix or data frame and the result should be
something like this
##we obtain
  rules      support  confidence  lift
1 {}=>{It4}  1.0000000       1    1.0
2 {}=>{It1}  1.0000000       1    1.0
3 {It3}=>{It2}  0.5000000       1    1.5
4 {It3}=>{It4}  0.5000000       1    1.0
5 {It3}=>{It1}  0.5000000       1    1.0
6 {It2}=>{It4}  0.6666667       1    1.0
7 {It2}=>{It1}  0.6666667       1    1.0
8 {It4}=>{It1}  1.0000000       1    1.0
9 {It1}=>{It4}  1.0000000       1    1.0
In another hand is it possible to obtain all the rules where lHS<=>rhs?. In
our last example that means to obtain
  lhs      rhs     support confidence lift
8 {It4} => {It1} 1.0000000          1  1.0
9 {It1} => {It4} 1.0000000          1  1.0
Thanks again Alberto

	[[alternative HTML version deleted]]


