7 lines
193 B
Text
7 lines
193 B
Text
|
MAData = {{}, 0};
|
||
|
|
MAS[x_, t_: Null] :=
|
||
|
|
With[{r = If[t === Null, MAData[[2]], t]},
|
||
|
|
Mean[MAData[[1]] =
|
||
|
|
If[Length[#] > (MAData[[2]] = r), #[[-r ;; -1]], #] &@
|
||
|
|
Append[MAData[[1]], x]]]
|