Displaying 1 result from an estimated 1 matches for "getrules".
2007 Oct 17
1
How to save association rules generated by arules package
...****************
*******************************************
library("arules")
rules <- read.csv("write1.csv",na.strings=c(".", "NA", "", "?"),header=TRUE)
transactions <- as(split(rules$Item, rules$ID), "transactions")
getrules <- apriori(transactions, parameter = list(support=0.100,
confidence=0.100))
summary(getrules)
inspect(SORT(getrules, by="confidence")[1:10])
****************************************************************************
*******************************************
I am workin...