#' Convert to normalized
#'
#' @inheritParams as_dummy
#' @export
as_normalized <- function(df = NULL, formula = NULL) {
a4me::a_class(df, "data.frame")
a4me::a_class(formula, "formula")
rec <- recipes::recipe(x = df, formula = formula) %>%
recipes::step_normalize(recipes::all_numeric(),
-recipes::all_outcomes())
rec %>%
recipes::prep(strings_as_factors = FALSE) %>%
recipes::juice()
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.