Anonymous user
Averages/Arithmetic mean: Difference between revisions
Added Oz.
(→{{header|R}}: Added REBOL example.) |
(Added Oz.) |
||
Line 647:
disp(omean([1,2,3]));</lang>
=={{header|Oz}}==
A version working on floats:
<lang oz>declare
fun {Mean Xs}
{FoldL Xs Number.'+' 0.0} / {Int.toFloat {Length Xs}}
end
in
{Show {Mean [3. 1. 4. 1. 5. 9.]}}</lang>
=={{header|Perl}}==
| |||