########################################################################################################################
addColourScheme <- function(plot, colours) {
out_plot <- plot + scale_color_manual(name = "Tagesmittelwerte", values = colours) +
scale_fill_manual(name = "", values = colours)
return(out_plot)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.