Remove["Global`*"]

ss=Flatten[Import["ss.xls"]]

Needs["HypothesisTesting`"]

keskvaart=0.636

sthalve=StandardDeviation[ss]

StudentTCI[keskvaart,sthalve,Length[ss]-1,ConfidenceLevel->.95]

Seega tõenäosusega 0,95 kuulub 2/Pi väärtus vahemikku..

StudentTCI[keskvaart,sthalve,Length[ss]-1,ConfidenceLevel->.99]

StudentTCI[keskvaart,sthalve,Length[ss]-1,ConfidenceLevel->.90]