https://github.com/cran/HLSM
Raw File
Tip revision: c80b73102b44a867701a8fa3eb0dd51a7fab5592 authored by Samrachana Adhikari on 26 May 2018, 21:01:51 UTC
version 0.8
Tip revision: c80b731
runningmeans.R
###Running Means####
runningmeans <- function(x, start){
  n.iter=length(x)
  val=sapply(start:n.iter, function(ii)  mean(x[start:ii]))
  return(val)
}
back to top