.onLoad <- function(libname, pkgname) {
scales <- c("scale_color_discrete", "scale_colour_ordinal", "scale_colour_discrete", "scale_color_continuous", "scale_color_gradient",
"scale_colour_gradient", "scale_fill_discrete", "scale_fill_ordinal", "scale_fill_continuous", "scale_fill_gradient",
"geom_bar", "geom_col", "geom_jitter", "geom_line", "geom_step", "geom_path")
suppressMessages(
for (i in scales) {
conflicted::conflict_prefer(name = i,
winner = "cr")
}
)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.