试验三周期信号的傅里叶级数分析及MATLAB实现_第1页
试验三周期信号的傅里叶级数分析及MATLAB实现_第2页
试验三周期信号的傅里叶级数分析及MATLAB实现_第3页
试验三周期信号的傅里叶级数分析及MATLAB实现_第4页
试验三周期信号的傅里叶级数分析及MATLAB实现_第5页
已阅读5页,还剩4页未读, 继续免费阅读

下载本文档

版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领

文档简介

1、实验三周期信号的傅里叶级数分析及 MATLA欧现一、实验目的:.利用MATLA殴现周期信号的分解与合成,并图示仿真结果;.用MATLA映现周期信号的频谱,画图观察和分析周期信号的频谱;.通过MATLAB寸周期信号频谱的仿真,进一步加深对周期信号频谱理论知识的 理解。二、实验内容9.1 (a):程序:display(Please input the value of m傅里叶级数展开项数);m=input(m=);t=-3*pi:0.01:3*pi;n=round(length(t)/4);f=cos(t).*(heaviside(t+2.5*pi)-heaviside(t+1.5*pi)+he

2、aviside(t+0.5*pi)-heaviside(t-0.5*pi)+heaviside(t-1.5*pi)-heaviside(t-2.5*pi);y=zeros(m+1,max(size(t);y(m+1,:)=f;figure(1);plot(t/pi,y(m+1,:);grid;axis(-3 3 -1 1.5);title(半波余弦);xlabel(单位:pi,Fontsize,8);x=zeros(size(t);kk=1;syms tx nT=2*pi;fx=sym(cos(tx);Nn=30;An=zeros(m+1,1);Bn=zeros(m+1,1);a0=2*int

3、(fx,tx,-T/4,T/4)/Tan=2*int(fx*cos(2*pi*(n+eps/2)*tx/T),tx,-T/4,T/4)/Tbn=2*int(fx*sin(2*pi*(n+eps/2)*tx/T),tx,-T/4,T/4)/TAn(1)=double(vpa(a0,Nn);An(2)=0.5;for k=2:mAn(k+1)=double(vpa(subs(an,n,k),Nn);Bn(k+1)=double(vpa(subs(bn,n,k),Nn);endy(1,:)=1/pi;y(2,:)=1/pi+1/2*cos(t);x=1/pi+1/2*cos(t);for k=2:6

4、pause;x=x+(-2*cos(pi*k/2)/pi/(kA2-1)*cos(k*t);y(k+1),:)=x;plot(t/pi,y(m+1,:);hold on;plot(t/pi,y(k+1),:);hold off;grid;axis(-3 3 -1 1.5);title(strcat(第,kk,次谐波叠加);xlabel(单位:pi,Fontsize,8);kk=strcat(kk,、,num2str(k);endpause;plot(t/pi,y(m+1,:);grid;axis(-3 3 -1 1.5);title(谐波叠加);xlabel(单位:pi,Fontsize,8)

5、;a0 =2/pian =162259276829213363391578010288128*(-sin(9007199254740991/1801439850948 1984*pi)*cos(1/2*pi*n)+cos(9007199254740991/18014398509481984*pi)*sin(1/2* pi*n)/(-81129638414606681695789005144063+18014398509481984*n+81129638 414606681695789005144064*nA2)/pi bn =013回区igure 19.3:display( Please in

6、put the value of T,tao and Nf);T=input( T=); tao=input( tao= );Nf=input( Nf=); syms xnk Nn=32;An=zeros(Nf+1,1);Bn=zeros(Nf+1,1); f=x/tao;a0=2*int(f,x,0,tao)/T;an=2*int(f*cos(n*x),x,0,tao)/T;bn=2*int(f*sin(n*x),x,0,tao)/T;An(1)=double(vpa(a0,Nn); for k=1:NfAn(k+1)=double(vpa(subs(an,n,k),Nn);Bn(k+1)=

7、double(vpa(subs(bn,n,k),Nn); end cn=sqrt(An.*An+Bn.*Bn);m=0:Nf; stem(m,cn); hold on ; plot(m,cn);xlabel(幅度谱 omega , Fontsize ,8)Please input the value of T,tao and NfT=10tao=2Nf=30Please input the value of T,tao and NfT=50tao=2Nf=30Please input the value of T,tao and NfT=100tao=2Nf=30Please input the value of T,tao and NfT=10tao=1Nf=30Please input the value of T,tao and NfT=10tao=3Nf=30Please input the value of T,tao an

温馨提示

  • 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
  • 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
  • 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
  • 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
  • 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
  • 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
  • 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。

评论

0/150

提交评论