RosettaCodeData/Task/Fivenum/Mathematica/fivenum.math

4 lines
119 B
Plaintext

ClearAll[FiveNum]
FiveNum[x_List] := Quantile[x, Range[0, 1, 1/4]]
FiveNum[RandomVariate[NormalDistribution[], 10000]]