Statistics

We need a statistic package

Needs["Statistics`Master`"]

Notice the back quotes `.

somed = {1.65, 2.87, 3.89, 4.23, 5.78, 6.48, 7.18, 8.65, 9.62, 10.73, 10.62, 9.2, 8.47, 7.86, 6.27, 5.67, 4.87, 3.97, 2.32, 1.85}

{1.65, 2.87, 3.89, 4.23, 5.78, 6.48, 7.18, 8.65, 9.62, 10.73, 10.62, 9.2, 8.47, 7.86, 6.27, 5.67, 4.87, 3.97, 2.32, 1.85}

Mean[somed]

6.109

Median[somed]

6.025

GeometricMean[somed]

5.34264

HarmonicMean[somed]

4.50437

RootMeanSquare[somed]

6.72356

StandardDeviation[somed]

2.88122

Variance[somed]

8.30143

Skewness[somed]

0.0357713

Kurtosis[somed]

1.84692

DispersionReport[somed]

{Variance→8.30143, StandardDeviation→2.88122, SampleRange→9.08, MeanDeviation→2.399, MedianDeviation→2.29, QuartileDeviation→2.315}

Created by Mathematica  (September 7, 2006) Valid XHTML 1.1!