MATLAB信号与系统分析(五)——连续时间信号的频谱分析

一、实验目的:

1、掌握傅立叶级数(FS),学会分析连续时间周期信号的频谱分析及MATLAB实现;

2、掌握傅立叶变换(FT),了解傅立叶变换的性质以及MATLAB实现。

 

二、利用符号运算求傅里叶级数的系数

1、复习几个函数:

F1=int(f,v,a,b) — 对f表达式的v变量在(a,b)区间求定积分

F2=subs(s,OLD,NEW)-用新变量NEW代替S中的指定变量OLD。

F3=vpa(x,n) : 显示可变精度计算;x为符号变量,n表示要精确计算的位数。

 

2、周期函数的傅里叶级数的形式

image

 

3、利用符号运算求傅立叶级数的系数

image

image

代码抄袭如下:

%ex_1

%求系数

clear all; syms t x n t0;

T=10;    % 信号周期

tao_2=0.5; %脉冲宽度

Nf=7; % 分解的最高级数

Nn=6; % 有效位数



x=heaviside(t+t0)-heaviside(t-t0); % 注意:Ver 2011b

x=subs(x,t0,tao_2)  



A0=int(x,t,-tao_2,T-tao_2)/T % a0



As=int(x*2*cos(2*pi*n*t/T)/T,t,-tao_2,T-tao_2) % an



Bs=int(x*2*sin(2*pi*n*t/T)/T,t,-tao_2,T-tao_2) % bn



Fn=(As-j*Bs)/2 % fn



A(1)=double(vpa(A0,Nn)); % 直流分量

for k=1:Nf

     A(k+1)=double(vpa(subs(As,n,k),Nn));

     B(k+1)=double(vpa(subs(Bs,n,k),Nn));

end

A

B

%求各次谐波::开始采用数值处理方法

t1=-T/2:0.01:T/2;

f0=A(1);                                             %直流分量

f1=A(2).*cos(2*pi*1*t1/T)+B(2).*sin(2*pi*1*t1/T); ;      % 基波

f2=A(3).*cos(2*pi*2*t1/T)+B(3).*sin(2*pi*2*t1/T); ;                 % 2次谐波

f3=A(4).*cos(2*pi*3*t1/T)+B(4).*sin(2*pi*3*t1/T);                 % 3次谐波

f4=A(5).*cos(2*pi*4*t1/T)+B(5).*sin(2*pi*4*t1/T); ;               % 4次谐波

f5=A(6).*cos(2*pi*5*t1/T)+B(6).*sin(2*pi*5*t1/T);                % 5次谐波

f6=A(7).*cos(2*pi*6*t1/T)+B(7).*sin(2*pi*6*t1/T);               % 6次谐波  

f7=f1+f2+f0;                      % 基波+2次谐波

f8=f7+f3+f0;                     % 基波+2次谐波+3次谐波

f9=f8+f4+f6+f0;                 % 基波+2次谐波+3次谐波+4次谐波+6次谐波 

%画出谐波图形

y=subs(x,t,t1);         %调用连续时间函数-周期矩形脉冲

subplot(2,2,1),plot(t1,f1),hold on;plot(t1,y,'r:');title('周期矩形波的形成—基波'),axis([-2.5,2.5,-0.5,1.1])

subplot(2,2,2),plot(t1,f7),hold on;plot(t1,y,'r:');title('周期矩形波的形成—基波+2次谐波'),axis([-2.5,2.5,-0.5,1.1])

subplot(2,2,3),plot(t1,f8),hold on;plot(t1,y,'r:');title('基波+2次谐波+3次谐波'),axis([-2.5,2.5,-0.5,1.1])

subplot(2,2,4),plot(t1,f9),hold on;plot(t1,y,'r:');title('基波+2次谐波+3次谐波+4次谐波+6次谐波'),axis([-2.5,2.5,-0.5,1.1])



%求频谱---------------这边给出双边谱的正轴部分,仅供参考

Fn=(As-j*Bs)/2

Nf=60;

A(1)=double(vpa(A0,Nn));

for k=1:Nf

     A(k+1)=double(vpa(subs(As,n,k),Nn));

     B(k+1)=double(vpa(subs(Bs,n,k),Nn));

end

Fn1(1) = A(1);

Fn1(2:Nf+1)=(A(2:Nf+1)-j*B(2:Nf+1))/2;

absFn1 = abs(Fn1);

angleFn1 = angle(Fn1);

figure;

subplot(211);stem([0:Nf],absFn1,'r.');title('双边幅度谱的正半轴,注意与p200图比较幅度值')

subplot(212);stem([0:Nf],angleFn1,'r.');title('双边相位谱的正半轴')

注意:课件里的基波定义有误,不应该含有直流分量

 

 

image

% 例9_1

% 观察周期方波信号的分解与合成

% m:傅里叶级数展开的项数

clc;clear all;close all;



display('Please input the value of m (傅里叶级数展开的项数)'); % 在命令窗口显示提示信息

m = input('m = ');                                             % 键盘输入傅里叶级数展开的项数

t = -2*pi:0.01:2*pi;                                            % 时域波形的时间范围-2π~2π,采样间隔0.01

n = round(length(t)/4);                                        % 根据周期方波信号的周期,计算1/2周期的数据点数

f = [ones(n,1);-1*ones(n,1);ones(n,1);-1*ones(n+1,1)];         %构造周期方波信号

y = zeros(m+1,max(size(t)));

y(m+1,:) = f'; 

figure(1);

plot(t/pi,y(m+1,:));                                           %绘制方波信号

grid;                                                          %在图形中加入栅格

axis([-2 2 -1.5 1.5]);                                         %指定图形显示的横坐标范围和纵坐标范围

title('周期方波');                                             %给显示的图形加上标题

xlabel('单位pi','Fontsize', 8);                                %显示横坐标单位

x = zeros(size(t));

kk = '1';

for k=1:2:2*m-1                                                %循环显示谐波叠加图形

    pause;

    x = x+sin(k*t)/k;

    y((k+1)/2,:) = 4/pi*x;                                     %计算各次谐波叠加和

    plot(t/pi,y(m+1,:));

    hold on;

    plot(t/pi,y((k+1)/2,:));                                   %绘制谐波叠加信号

    hold off;

    grid;

    axis([-2 2 -1.5 1.5]);

    title(strcat('',kk,'次谐波叠加'));

    xlabel('单位pi','Fontsize', 8);

    kk = strcat(kk,'',num2str(k+2));

end

pause;

plot(t/pi,y(1:m+1,:));

grid;

axis([-2 2 -1.5 1.5]);

title('各次谐波叠加波形');

xlabel('单位pi','Fontsize', 8);

% End

 

4、周期信号的频谱分析:

image

%ex_3求频谱

clear all;syms t x n t0;

T=5;tao=0.5;Nf=60;Nn=6;

x=heaviside(t+t0)-heaviside(t-t0)

x=subs(x,t0,tao)

A0=int(x,t,-tao,T-tao)/T

As=int(x*2*cos(2*pi*n*t/T)/T,t,-tao,T-tao)

Bs=int(x*2*sin(2*pi*n*t/T)/T,t,-tao,T-tao)

Fn=(As-j*Bs)/2

A(1)=double(vpa(A0,Nn));

for k=1:Nf

     A(k+1)=double(vpa(subs(As,n,k),Nn));

     B(k+1)=double(vpa(subs(Bs,n,k),Nn));

end

t1=-2.5:0.003:2.5;

y=subs(x,t,t1);

subplot(3,1,1),plot(t1,y),title('矩形脉冲'),axis([-2.5,2.5,-0.1,1.1])

%单边谱

Fs(1)=A(1);

Fs(2:Nf+1)=abs(A(2:Nf+1)-j.*B(2:Nf+1));

Ns=0:Nf;

subplot(3,1,2),stem(Ns,Fs),title('连续时间函数的单边谱')

%双边谱

N=Nf*2*pi/T;

K=-N:2*pi/T:N;

Fs(2:Nf+1)=abs(A(2:Nf+1)-j.*B(2:Nf+1))/2;

Fd=[fliplr(Fs),Fs(2:Nf+1)];

subplot(3,1,3),stem(K,Fd),title('连续时间函数的双边谱')

 

5、利用MATLAB实现典型周期信号的频谱

(1)周期方波脉冲频谱的Matlab实现

% 周期方波信号频谱分析

function  CTFS_SQ

%  绘制并观察周期方波信号频谱   

%  Nf:傅里叶级数展开的项数

%  an:各次谐波余弦项系数

display('Please input the value of Nf ');

Nf = input('Nf = ');

an = zeros(Nf+1,1);

cn(1) = 0;

for i = 1:Nf 

    an(i+1) = 2/(i*pi)*sin(i*pi/2);                     %计算系数an

    cn(i+1) = abs(2/(i*pi)*sin(i*pi/2));                %计算幅度谱

end

t = -5:0.01:5;

x = square(pi*(t+0.5));                                 %用square函数求方波信号

subplot(211);

plot(t,x);                                              %绘制方波信号

axis([-5 5 -1.5 1.5]);

title('周期方波信号','Fontsize',8);

xlabel('t   (单位:s)', 'Fontsize',8);

subplot(212);

k = 0:Nf;

stem(k,cn);

hold on;

plot(k,cn);

title('幅度频谱','Fontsize',8);

xlabel('谐波次数', 'Fontsize',8);

% End

 

(2)周期锯齿波脉冲频谱的Matlab实现

% 周期锯齿脉冲信号频谱分析

function  CTFS_JC

% 绘制并观察周期锯齿脉冲信号频谱特性

%     Nf:谐波的次数

% bn:第1,2,3,...次谐波正弦项系数

display('Please input the value of Nf ');

Nf = input('Nf = ');

bn = zeros(Nf+1,1);

cn = zeros(Nf+1,1);

bn(1) = 0;

for i = 1:Nf

    bn(i+1) = (-1)^(i+1)*1/(i*pi);                          % 计算系数bn

    cn(i+1) = abs(bn(i+1));                                 %计算幅度频谱

end

t = -5:0.01:5;

x = sawtooth(pi*(t+1));                                     %用sawtooth函数构造周期锯齿脉冲信号

subplot(211);

plot(t,x);

axis([-5 5 -1.5 1.5]);

title('周期锯齿脉冲信号','Fontsize',8);

xlabel('t   (单位:s)', 'Fontsize',8);

subplot(212);

k = 0:Nf;

stem(k,cn);

hold on;

plot(k,cn);

title('幅度频谱','Fontsize',8);

xlabel('谐波次数', 'Fontsize',8);

% End

 

(3)周期三角波脉冲频谱的Matlab实现

% 周期三角脉冲信号频谱分析

function  CTFS_SJ

%  绘制周期三角脉冲信号频谱

%     Nf:谐波的次数

%  an:第1,2,3,...次谐波余弦项系数

display('Please input the value of Nf ');

Nf = input('Nf = ');

an = zeros(Nf+1,1);

cn = zeros(Nf+1,1);

an(1) = 1/2;

an(1) = an(1);

for i = 1:Nf

    an(i+1) = 4*sin(i*pi/2)*sin(i*pi/2)/(i*i*pi*pi);

    cn(i+1) = abs(an(i+1));

end

t = -5:0.01:5;

x = (sawtooth(pi*(t+1),0.5)+1)/2;                        %构造三角脉冲信号

subplot(211);

plot(t,x);

axis([-5 5 -1.5 1.5]);

title('周期三角脉冲信号','Fontsize',8);

xlabel('t   (单位:s)', 'Fontsize',8);

subplot(212);

k = 0:Nf;

stem(k,cn);

hold on;

plot(k,cn);

title('幅度频谱','Fontsize',8);

xlabel('谐波次数', 'Fontsize',8);

% End

 

三、非周期函数的傅立叶变换

image

1、利用符号函数求傅立叶变换

傅立叶变换:F=fourier(f);        F,f应为符号表达式

反傅立叶变换:f=ifourier(F);

 

2、连续时间信号傅立叶变换的数值计算

image

代码实现

%ex_4

clear all;

R=0.01;

t=-2:R:2;

f=Heaviside(t+1)-Heaviside(t-1);

W1=2*pi*5;

N=1000;k=-N:N;W=k*W1/N;



F=f*exp(-j*t'*W)*R;

F_r=real(F);

figure(1)

subplot(2,1,1);plot(t,f);

xlabel('t');ylabel('f(t)');title('f(t)=u(t+1)-u(t-1)');

subplot(2,1,2);plot(W,F_r);

xlabel('w');ylabel('F(w)');title('f(t)的付氏变换F(w)');

F_A=abs(F);%幅频特性

F_P=angle(F);%相频特性

figure(2)

subplot(2,1,1),plot(W,F_A),xlabel('w');ylabel('abs(F(w))');title('f(t)幅频特性)');

subplot(2,1,2),plot(W,F_P),xlabel('w');ylabel('angle(F(w))');title('f(t)相频特性)');

你可能感兴趣的:(matlab)