R/moving_average.R

#' 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))}
DongyueXie/scca documentation built on May 29, 2019, 2:37 p.m.