Averages/Arithmetic mean: Difference between revisions
→{{header|V}}
Line 336:
(echo 3; echo 1; echo 4) | mean
=={{header|V}}==
[mean
[sum 0 [+] fold].
dup sum
swap size [[1 <] [1]] when /
].
|
Line 336:
(echo 3; echo 1; echo 4) | mean
=={{header|V}}==
[mean
[sum 0 [+] fold].
dup sum
swap size [[1 <] [1]] when /
].
|
edits