% Script to draw figure 9.10 (p. 290). Approximate binomial distribution
% with the Gaussian.

axis([0.0,5.0,0.0,0.4])
hold on
plot(0:5,[1,5,10,10,5,1]./32,'ko')
fplot(@(t) exp(-(t-2.5)^2/(2*1.25))/(sqrt(2*pi*1.25))',[0.0,5.0],'k')
