%This script-M-file is a solution to exercise 14 i Eriksen &
%Lauritzen (2004). Answers are held in  a, b og c
x=[110,109,110,108,111,112,109,111,112];
m=mean(x)
s=std(x)
a=[m-norminv(0.975)/3,m+norminv(0.975)/3]
b=[m-tinv(0.975,8)*s/3,m+tinv(0.975,8)*s/3]
c=[s*sqrt(8/chi2inv(0.975,8)),s*sqrt(8/chi2inv(0.025,8))]
