RosettaCodeData/Task/Averages-Arithmetic-mean/Wortel/averages-arithmetic-mean.wortel
2016-12-05 23:44:36 +01:00

12 lines
203 B
Text

@let {
; using a fork (sum divided-by length)
mean1 @(@sum / #)
; using a function with a named argument
mean2 &a / @sum a #a
[[
!mean1 [3 1 4 1 5 9 2]
!mean2 [3 1 4 1 5 9 2]
]]
}