]);
  title('Risk Premia')

  subplot(2,2,3)
  surf(2007+(1/4)*linspace(1,N,N),ttm,1e4*mean(T,3)')
  colormap('summer')
  xlabel('Time (yrs.)')
  ylabel('Tenor (yrs.')
  ylabel('Per cent')
  title('Model Risk Premia')
  axis tight
  
  subplot(2,2,4)
  surf(2007+(1/4)*linspace(1,N,N),ttm,1e4*mean(T1,3)')
  colormap('summer')
  xlabel('Time (yrs.)')
  ylabel('Tenor (yrs.')
  ylabel('Per cent')
  title('RW Risk Premia')
  axis tight
  
end;



##### SOURCE END #####
--></body></html>