Laden der Datei

data=Import[FileNameJoin[{NotebookDirectory[],"42.wdx"}]];

Mittelwert

mu=Mean[data]

Standardabweichung

sigma=StandardDeviation[data]

Histogram

Histogram[data,100]

Vertrauensbereich

confInterval=sigma/Sqrt[Length[data]]

Schwankungstest

nPlus=Length[Select[data,GreaterThan[mu]]]
nMinus=Length[Select[data,LessThan[mu]]]
Abs[nPlus-nMinus]≤Sqrt[Length[data]]

Sigma ratios

Length[Select[data,mu-sigma<#<mu+sigma&]]/Length[data]*100.0
Length[Select[data,mu-2*sigma<#<mu+2*sigma&]]/Length[data]*100.0
Length[Select[data,mu-5*sigma<#<mu+5*sigma&]]/Length[data]*100.0