Cumulative standard deviation: Difference between revisions
m
→{{header|Perl 6}}: one newline missing
(→{{header|Perl 6}}: remove spurious newlines) |
m (→{{header|Perl 6}}: one newline missing) |
||
Line 1,317:
Using a state variable:
<lang perl6># remember that <(x-<x>)²> = <x²> - <x>²
sub stddev($x) {
state @sum;
return sqrt(
|