RosettaCodeData/Task/Averages-Arithmetic-mean/Dc/averages-arithmetic-mean-2.dc
2023-07-01 13:44:08 -04:00

6 lines
137 B
Text

[[Nada Mean: ]Ppq]sq
zd0=qsn [stack length = n]sz
1k [precision can be altered]sz
[+z1<+]ds+x[Sum: ]Pp
ln/[Mean: ]Pp
[Sample size: ]Plnp