# NOT RUN {
# creating a dataframe with counts and percentage
df <-
mtcars %>%
dplyr::group_by(.data = ., am, cyl) %>%
dplyr::summarize(.data = ., counts = n()) %>%
dplyr::mutate(.data = ., perc = (counts / sum(counts)) * 100) %>%
dplyr::ungroup(x = .) %>%
dplyr::arrange(.data = ., dplyr::desc(x = cyl)) %>%
dplyr::filter(.data = ., counts != 0L)
# dataframe with label column
ggstatsplot:::cat_label_df(
data = df,
label.col.name = "slice.label",
label.content = "both",
perc.k = 1
)
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab