RosettaCodeData/Task/Averages-Arithmetic-mean/J/averages-arithmetic-mean-2.j
Ingy döt Net db842d013d A-M baby
2013-04-10 21:29:02 -07:00

7 lines
188 B
Text

mean 3 1 4 1 5 9
3.83333
mean $0 NB. $0 is a zero-length vector
0
x=: 20 4 ?@$ 0 NB. a 20-by-4 table of random (0,1) numbers
mean x
0.58243 0.402948 0.477066 0.511155