y(t)=|t|, y(t+2π)=y(t) のフーリエ級数展開。(周期T=2π)
固有周波数f0=1/T。
以下のようにフーリエ級数展開するとき、
係数は以下のように計算される。
clear; close all; clc; T=2*pi; f0=1/T; dt=0.01; t=-T/2:dt:T/2; c = @(n) 2/T*((-1)^n-1)/(2*pi*f0*n)^2; c0 = T/4; f=@(t) abs(t); y=f(t); plot(t,y,'DisplayName','original'); hold on; nmaxs=[1,3,5]; for idx=1:length(nmaxs) nmax = nmaxs(idx); ft=fourier_series_complex(t,f0,c0,c,nmax); plot(t,ft,'DisplayName',sprintf('N=%d',nmax)); end legend(); big; function ft=fourier_series_complex(t,f0,c0,c,nmax) ft = 0; for n=-nmax:nmax if n==0 cn = c0; else cn = c(n); end ft = ft + cn*exp(1j*(2*pi*f0*n)*t); end end
