Create MovingAvg.R