rCBA (version 0.0.1)

pruning: A Pruning function

Description

A Pruning function

Usage

pruning(train, rules, method = "m2cba")

Arguments

train

data.frame with training data

rules

data.frame with rules

method

pruning method m2cba(default)|m1cba|dcbrcba

Value

data.frame with pruned rules

Examples

# NOT RUN {
library("arules")
library("rCBA")
data("iris")

train <- sapply(iris,as.factor)
train <- data.frame(train, check.names=FALSE)
txns <- as(train,"transactions")

rules = apriori(txns, parameter=list(support=0.03, confidence=0.03, minlen=2), 
appearance = list(rhs=c("Species=setosa", "Species=versicolor", "Species=virginica"),default="lhs"))
rulesFrame <- as(rules,"data.frame")

print(nrow(rulesFrame))
prunedRulesFrame <- pruning(train, rulesFrame, method="m2cba")
print(nrow(prunedRulesFrame))
# }