# FILTER BY MONTH (A SMALL FUNCTION)
# may be deleted
filter_month <- function(data,month_no){
return(data[month(date) == month_no,])
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.