set item appearances ...[0 item(s)] done [0.00s].
set transactions ...[27 item(s), 179 transaction(s)] done [0.00s].
sorting and recoding items ... [22 item(s)] done [0.00s].
creating transaction tree ... done [0.00s].
checking subsets of size 1 2 done [0.00s].
writing ... [19 rule(s)] done [0.00s].
creating S4 object ... done [0.00s].
Warning message:
In apriori(mba, parameter = list(support = 0.03, confidence = 0.4, :
Mining stopped (maxlen reached). Only patterns up to a length of 2 returned!
> summary(rules)
set of 19 rules
rule length distribution (lhs + rhs):sizes
2
19
Min. 1st Qu. Median Mean 3rd Qu. Max.
2 2 2 2 2 2
summary of quality measures:
support confidence lift
Min. :0.03352 Min. :0.4048 Min. :1.362
1st Qu.:0.10056 1st Qu.:0.4988 1st Qu.:1.637
Median :0.16760 Median :0.6122 Median :2.275
Mean :0.14760 Mean :0.6505 Mean :2.216
3rd Qu.:0.17318 3rd Qu.:0.7941 3rd Qu.:2.578
Max. :0.31844 Max. :0.9661 Max. :3.236
count
Min. : 6.00
1st Qu.:18.00
Median :30.00
Mean :26.42
3rd Qu.:31.00
Max. :57.00
mining info:
data ntransactions support confidence
mba 179 0.03 0.4
> x=sort(subset(rules,subset=lhs%pin%"=TRUE"&rhs%pin%"=TRUE"&lift>=1),by="support")
> inspect(x[1:10])
Error in slot(x, s) : subscript out of bounds mba.txt (9.8 KB)