mirror
/
RosettaCodeData
mirror of https://github.com/acmeism/RosettaCodeData.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity
RosettaCodeData/Task/Averages-Simple-moving-average/Mathematica/averages-simple-moving-aver...

2 lines
75 B
Plaintext
Raw Permalink Blame History

MA[x_List, r_] := Join[Table[Mean[x[[1;;y]]],{y,r-1}], MovingAverage[x,r]]
Reference in New Issue View Git Blame Copy Permalink