#' Moving average
#'
#' @param x: data
#' @param n: average interval
#' @return averaged data
#' @export
#'
moav=function(x,n){return(filter(x,rep(1/n,n),sides=2))}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.