data(iris)
cf <- condformat(iris[c(1:5, 51:55, 101:105),]) %>%
rule_css(Species, expression = ifelse(Species == "setosa", "red", "darkgreen"),
css_field = "color")
if (FALSE) {
print(cf)
}
Run the code above in your browser using DataLab