% Draw figure 3.1, p. 52.

u=[0.0941;0.4514;0.6371;0.9001; 0.8884; 0.9844; 1.0431; 0.8984; 0.7319; ...
0.3911; -0.0929];
m=zeros(11); 
m(1,1)=1;
m(11,11)=1;
for i=2:10
  m(i,i-1)=1/3;
  m(i,i)=1/3;
  m(i,i+1)=1/3;
end;
v=m*u;
plot(1:11,u,'-bo')
hold on
plot(1:11,v,'--r*')
