#'@export
set_theme_chapter1 <- function(){
library(ggplot2)
library(gridExtra)
theme_set(theme_void())
colors <- c(rgb(.75, 0.75, 0.75), rgb(0.255, 0.412, 0.882))
return(list(colors = colors))
}
#'@export
set_theme_chapter2 <- function(){
library(ggplot2)
library(gridExtra)
theme_set(theme_void())
colors <- c(rgb(.1, 0.5, 0.3), rgb(0.9, 0.8, 0.1))
return(list(colors = colors))
}
#'@export
set_theme_chapter3 <- function(){
library(ggplot2)
library(gridExtra)
theme_set(theme_void())
colors <- c(rgb(0.8,0.5,0.2), rgb(0.2, 0.6, 0.9))
return(list(colors = colors))
}
#'@export
set_theme_chapter4 <- function(){
library(ggplot2)
library(gridExtra)
theme_set(theme_void())
colors <- c(rgb(0.8,0.5,0.4), rgb(0.5, 0.3, 0.8))
return(list(colors = colors))
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.