adorn_ns | R Documentation |
This function adds back the underlying Ns to a tabyl
whose percentages were calculated using adorn_percentages()
, to display the Ns and percentages together. You can also call it on a non-tabyl data.frame to which you wish to append Ns.
adorn_ns( dat, position = "rear", ns = attr(dat, "core"), format_func = function(x) { format(x, big.mark = ",") }, ... )
dat |
a data.frame of class |
position |
should the N go in the front, or in the rear, of the percentage? |
ns |
the Ns to append. The default is the "core" attribute of the input tabyl |
format_func |
a formatting function to run on the Ns. Consider defining with |
... |
columns to adorn. This takes a tidyselect specification. By default, all columns are adorned except for the first column and columns not of class |
a data.frame with Ns appended
mtcars %>% tabyl(am, cyl) %>% adorn_percentages("col") %>% adorn_pct_formatting() %>% adorn_ns(position = "front") # Format the Ns with a custom format_func: set.seed(1) bigger_dat <- data.frame(sex = rep(c("m", "f"), 3000), age = round(runif(3000, 1, 102), 0)) bigger_dat$age_group = cut(bigger_dat$age, quantile(bigger_dat$age, c(0, 1/3, 2/3, 1))) bigger_dat %>% tabyl(age_group, sex, show_missing_levels = FALSE) %>% adorn_totals(c("row", "col")) %>% adorn_percentages("col") %>% adorn_pct_formatting(digits = 1) %>% adorn_ns(format_func = function(x) format(x, big.mark = ".", decimal.mark = ",")) # Control the columns to be adorned with the ... variable selection argument # If using only the ... argument, you can use empty commas as shorthand # to supply the default values to the preceding arguments: cases <- data.frame( region = c("East", "West"), year = 2015, recovered = c(125, 87), died = c(13, 12) ) cases %>% adorn_percentages("col",,recovered:died) %>% adorn_pct_formatting(,,,,,recovered:died) %>% adorn_ns(,,,recovered:died)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.