vincentarelbundock/modelsummary

`datasummary_balance` weights in percentages

Open

#500 opened on Jun 13, 2022

View on GitHub
 (0 comments) (0 reactions) (0 assignees)R (73 forks)batch import
good first issue

Repository metrics

Stars
 (894 stars)
PR merge metrics
 (No merged PRs in 30d)

Description

Conditional on weights being a column, do something like this:

wtpct <- function(x, y) sum(x, na.rm = TRUE) / sum(y, na.rm = TRUE) * 100
datasummary(species * sex + 1 ~ N + flipper_length_mm * Percent(fn = wtpct),
            output = "markdown",
            data = penguins)

Contributor guide