Averages/Root mean square: Difference between revisions

(→‎{{header|Emacs Lisp}}: use a range producer instead of typing it out)
Line 844:
rms (Array.init 10 (fun i -> float_of_int (i+1))) ;;
(* 6.2048368229954285 *)</lang>
 
=={{header|Oforth}}==
 
<lang Oforth>10 seq map(#sq) sum 10.0 / sqrt println</lang>
 
{{out}}
<pre>
6.20483682299543
</pre>
 
=={{header|ooRexx}}==
<lang ooRexx>call testAverage .array~of(10, 9, 8, 7, 6, 5, 4, 3, 2, 1)
1,015

edits