knitr::opts_chunk$set(echo = TRUE) library(tidyverse) library(rainbow)
data(sbdata) res = spring_summary(sbdata, spring_out=TRUE ) head(res) allyear = res[[2]] ggplot(allyear, aes(as.factor(year), tavg_mean, fill=precip_sum))+geom_col()
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.