# NOT RUN {
rules <- validator(height >= 60,weight < 159)
satisfying(women, rules)
violating(women, rules)
out <- confront(women, rules)
summary(out)
satisfying(women, out)
violating(women, out)
# }
Run the code above in your browser using DataLab