diff --git a/R/apply_conditional_format.R b/R/apply_conditional_format.R index 16198fa1..54583b07 100644 --- a/R/apply_conditional_format.R +++ b/R/apply_conditional_format.R @@ -11,15 +11,15 @@ #' @noRd validate_conditional_format_params <- function(string, format_group, condition, replacement, full_string) { if (!inherits(string, "character")) { - stop("Paramter `string` must be a character vector", call.=FALSE) + stop("Parameter `string` must be a character vector", call.=FALSE) } if (!inherits(format_group, "numeric") || (inherits(format_group, "numeric") && format_group %% 1 != 0)) { - stop("Paramter `format_group` must be an integer", call.=FALSE) + stop("Parameter `format_group` must be an integer", call.=FALSE) } if (!inherits(replacement, "character")) { - stop("Paramter `replacement` must be a string", call.=FALSE) + stop("Parameter `replacement` must be a string", call.=FALSE) } # Condition statement must use the variable name 'x' @@ -28,7 +28,7 @@ validate_conditional_format_params <- function(string, format_group, condition, } if (!inherits(full_string, "logical")) { - stop("Paramter `full_string` must be bool", call.=FALSE) + stop("Parameter `full_string` must be bool", call.=FALSE) } } diff --git a/vignettes/table.Rmd b/vignettes/table.Rmd index 0d4ab526..c0f888f6 100644 --- a/vignettes/table.Rmd +++ b/vignettes/table.Rmd @@ -115,6 +115,8 @@ header_n(t) %>% kable() ``` +Note: it’s expected the set_distinct_by() function is used with population data. This is because it does not make sense to use population data denominators unless you have distinct counts. The entire point of population data is to use subject counts, so non-distinct counts would potentially count multiple records per subject and then the percentage doesn’t make any sense. + With the table level settings under control, now you're ready to learn more about what **Tplyr** has to offer in each layer. - Learn more about descriptive statistics layers in `vignette("desc")`