Averages/Root mean square: Difference between revisions
Content added Content deleted
mNo edit summary |
(Added EchoLisp) |
||
Line 380: | Line 380: | ||
<lang e>? RMS(1..10) |
<lang e>? RMS(1..10) |
||
# value: 6.2048368229954285</lang> |
# value: 6.2048368229954285</lang> |
||
=={{header|EchoLisp}}== |
|||
<lang scheme> |
|||
(define (rms xs) |
|||
(sqrt (// (for/sum ((x xs)) (* x x)) (length xs)))) |
|||
(rms (range 1 11)) |
|||
→ 6.2048368229954285 |
|||
</lang> |
|||
=={{header|Elixir}}== |
=={{header|Elixir}}== |