RosettaCodeData/Task/Averages-Arithmetic-mean/J/averages-arithmetic-mean-3.j
2023-07-01 13:44:08 -04:00

11 lines
152 B
Text

mean1=: 3 : 0
z=. 0
for_i. i.#y do. z=. z+i{y end.
z % #y
)
mean1 3 1 4 1 5 9
3.83333
mean1 $0
0
mean1 x
0.58243 0.402948 0.477066 0.511155