vincentarelbundock/modelsummary
View on GitHub`datasummary_balance` weights in percentages
Open
#500 opened on Jun 13, 2022
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)