# NOT RUN {
mtcars %>%
tabyl(am, cyl) %>%
adorn_percentages() %>%
adorn_rounding(digits = 2, rounding = "half up")
# tolerates non-numeric columns:
library(dplyr)
mtcars %>%
tabyl(am, cyl) %>%
adorn_percentages("all") %>%
mutate(dummy = "a") %>%
adorn_rounding()
# control the columns modified using the ... argument:
mtcars %>%
tabyl(am, cyl) %>%
adorn_percentages("row") %>%
adorn_rounding(digits = 1, rounding = "half up", starts_with("8"))
# }
Run the code above in your browser using DataLab