#' @export
scale_emissions_by <- function (input_data, using, ...) {
apply_scalars(input_data, using, value_col = "ems_qty", ...)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.