Contents
% demokantti0 8.12.08
Kanttiaallon Fourier-osasummia
X=[-pi 0 0 pi]; Y=[-1 -1 1 1]; plot(X,Y,'k'); ylim([-1.2 1.2]);shg % Esim 1 (KRE s. 532) Kanttiaallon (jakso 2*pi) Fourier-sarjan osasummia hold on x=linspace(-pi,pi); s1=(4/pi)*sin(x); s3=s1+(4/pi)*sin(3*x)/3; s5=s3+(4/pi)*sin(5*x)/5; plot(x',[s1' s3' s5']); hold on plot(X,Y); ylim([-1.2 1.2]);shg