291/CH6/EX6.6b/eg6_6b.sce


1
2
3
4
5
6
7
8

meaneach = 147;
sdeach  = 62;
samplesize = 25;
lim =150;
samplemean = meaneach;
samplesd= sdeach/sqrt(samplesize)
prob = 1- cdfnor("PQ", lim, samplemean, samplesd)
disp(prob)