exm05121_1.m

这是本人收集的一些程序源代码

%exm05121_1.m
t=-5:0.5:5;w=exp(-abs(t));
N0=length(t);tt=linspace(t(1),t(end),10*N0);
ww=spline(t,w,tt);
error=max(abs(ww-exp(-abs(tt))))
shg,
plot(tt,ww,'b');hold on	
stem(t,w,'filled','r');hold off