请看一下函数傅里叶级数表示的问题

daphne_wj

就是一个方波
p0=1;
T1=2;
w1=2.;
p[t_]:=-p0/; -T1/2<t<0
p[t_]:=p0/; 0<t<T1/2
bn[n_]:=4*p0/T1*Sum(0,T1/2) Sin[n*w1*t]dt;

注：Sum代表积分，括号内数值代表上下限

pp[t]=0;
Do[pp[t]=pp[t]+bn[n] Sin[n*w1*t],{n,1,7,2}]
pp[t_]:=(4*p0)/Pi*p[t]
pp[t]
Plot[pp[t],{t,-1,1}]

p[t]为方波函数，pp[t]为方波函数的傅里叶级数表示
那么为什么表示不出来呢？用Do不对吗？

PS：很多基本的问题的得到及时的解答，我都看到了，没有回复答谢，在这一并谢过：）

TBE_Legend

你用分段函数定义方波，这样的方波是不能展开傅里叶级数的。

你的ppt里面还有p等呢，怎么能画图？

举个例子：

Needs["FourierSeries`"]
p[t_] := UnitStep[Sin[Pi t]]
fp = NFourierSeries[p[t], t, 50];
Plot[{p[t], fp}, {t, 0, 5},
PlotStyle -> {{Blue, Thick}, {Red, Thick, Dotted}}]