# NOT RUN {
x <- read.arff(system.file("arff", "contact-lenses.arff",
package = "RWeka"))
## Apriori with defaults.
Apriori(x)
## Some options: set required number of rules to 20.
# }
# NOT RUN {
<!-- % Apriori(x, c("-N", "20")) -->
# }
# NOT RUN {
Apriori(x, Weka_control(N = 20))
# }
# NOT RUN {
## Requires Weka package 'tertius' to be installed.
## Tertius with defaults.
Tertius(x)
## Some options: only classification rules (single item in the RHS).
<!-- % Tertius(x, "-S") -->
Tertius(x, Weka_control(S = TRUE))
# }
Run the code above in your browser using DataLab