# NOT RUN {
library(Rdrools)
data(rules)
input.columns<-c('name', 'class', 'grade', 'email')
output.columns<-c('address', 'subject', 'body')
rules.session<-rulesSession(rules, input.columns, output.columns)
# }
Run the code above in your browser using DataLab