Cumulative standard deviation: Difference between revisions
Content added Content deleted
m (→RPL 1993: typo) |
|||
Line 1,348: | Line 1,348: | ||
1.3997084244475297 |
1.3997084244475297 |
||
2.0</syntaxhighlight> |
2.0</syntaxhighlight> |
||
=={{header|EasyLang}}== |
|||
{{trans|Pascal}} |
|||
<syntaxhighlight lang="easylang"> |
|||
global sum sum2 n . |
|||
proc sd x . r . |
|||
sum += x |
|||
sum2 += x * x |
|||
n += 1 |
|||
r = sqrt (sum2 / n - sum * sum / n / n) |
|||
. |
|||
v[] = [ 2 4 4 4 5 5 7 9 ] |
|||
for v in v[] |
|||
call sd v r |
|||
print v & " " & r |
|||
. |
|||
</syntaxhighlight> |
|||
=={{header|Elixir}}== |
=={{header|Elixir}}== |