Averages/Root mean square: Difference between revisions
Content added Content deleted
(→Tcl: Added implementation) |
(Add J) |
||
Line 13: | Line 13: | ||
<lang haskell>main = print $ mean 2 [1 .. 10]</lang> |
<lang haskell>main = print $ mean 2 [1 .. 10]</lang> |
||
=={{header|J}}== |
|||
'''Solution:''' |
|||
<lang j>rms=: (+/ % #)&.:*:</lang> |
|||
'''Example Usage:''' |
|||
<lang j> rms >: i. 10 |
|||
6.20484</lang> |
|||
=={{header|Lua}}== |
=={{header|Lua}}== |