RosettaCodeData/Task/Cumulative-standard-deviation/Mathematica/cumulative-standard-deviation.math

2 lines
96 B
Text
Raw Permalink Normal View History

2023-07-01 11:58:00 -04:00
runningSTDDev[n_] := (If[Not[ValueQ[$Data]], $Data = {}];StandardDeviation[AppendTo[$Data, n]])