Anonymous user
Averages/Arithmetic mean: Difference between revisions
m
Lingo added
(Update WDTE example for language overhaul.) |
m (Lingo added) |
||
Line 1,633:
return n / (real len a);
}</lang>
=={{header|Lingo}}==
<lang Lingo>-- v can be (2D) point, (3D) vector or list of integers/floats
on mean (v)
case ilk(v) of
#point: cnt = 2
#vector: cnt = 3
#list: cnt = v.count
otherwise: return
end case
sum = 0
repeat with i = 1 to cnt
sum = sum + v[i]
end repeat
return float(sum)/cnt
end</lang>
<lang Lingo>put mean(point(1, 2.5))
-- 1.7500
put mean(vector(1.2, 4.7, 5.6))
-- 3.8333
put mean([6,12,18,24,30,36,42,48,54,60,66,72,78])
-- 42.0000</lang>
=={{header|LiveCode}}==
|