RosettaCodeData/Task/Cumulative-standard-deviation/Mathematica/cumulative-standard-deviation.math
2023-07-01 13:44:08 -04:00

1 line
96 B
Text

runningSTDDev[n_] := (If[Not[ValueQ[$Data]], $Data = {}];StandardDeviation[AppendTo[$Data, n]])