R/moving.average.R

Defines functions moving_average

Documented in moving_average

#' Moving average
#'
#' @author D'Arcy Webber
#' @export
#' 
moving_average <- function(x, n = 11)
{
    stats::filter(x, rep(1/n, n), sides = 1)
}
NZRLIC/RLPlots documentation built on May 9, 2017, 1:20 p.m.