N=256; t=linspace(-5,5,N); w=linspace(-10*pi,10*pi,M); dt=4/(N-1); M=500; j=sqrt(-1); f=1/3*cos(t); f1=f.*exp(-j*t*20); f2=f.*exp(j*t*20); F=f*exp(-j*t'*w)*dt; F1=f1*exp(-j*t'*w)*dt; F2=f2*exp(-j*t'*w)*dt; subplot(2,1,1); plot(w,real(F),w,real(F1),w,real(F2)) subplot(2,1,2); plot(w,abs(F),w,abs(F1),w,abs(F2))

这段代码也是用 MATLAB 编写的，实现了一个信号的傅里叶变换，并绘制了该信号在频域上的实部和幅度谱。具体解释如下：

1. N=256; t=linspace(-5,5,N); w=linspace(-10*pi,10*pi,M); dt=4/(N-1); M=500; j=sqrt(-1); f=1/3*cos(t); f1=f.*exp(-j*t*20); f2=f.*exp(j*t*20);

第一行代码定义了信号的长度为 N=256，时间采样点为 t，采样范围为 [-5,5]。第二行代码定义了频域采样点数 M=500，频率采样范围为 [-10π,10π]。第三行代码计算了采样时间间隔 dt。第四行代码定义了复数单位 j=sqrt(-1)。第五行代码定义了原始信号 f 和经过正弦函数调制的信号 f1 和 f2。

2. F=f*exp(-j*t'*w)*dt; F1=f1*exp(-j*t'*w)*dt; F2=f2*exp(-j*t'*w)*dt;

第六行代码计算了原始信号 f 和经过正弦函数调制的信号 f1 和 f2 的傅里叶变换 F、F1 和 F2，采用了快速傅里叶变换算法（FFT）。其中 exp(-j*t'*w) 表示傅里叶变换的指数部分，dt 表示积分步长。

3. subplot(2,1,1); plot(w,real(F),w,real(F1),w,real(F2))

第七行代码绘制了两个子图，第一个子图表示信号在频域上的实部，其中 subplot(2,1,1) 表示将画布分成两行一列，当前子图为第一行；plot(w,real(F),w,real(F1),w,real(F2)) 表示绘制原始信号 f 和经过正弦函数调制的信号 f1 和 f2 在频域上的实部。real(F)、real(F1) 和 real(F2) 分别表示傅里叶变换结果的实部。

4. subplot(2,1,2); plot(w,abs(F),w,abs(F1),w,abs(F2))

第八行代码绘制了第二个子图，表示信号在频域上的幅度谱，其中 subplot(2,1,2) 表示当前子图为第二行；plot(w,abs(F),w,abs(F1),w,abs(F2)) 表示绘制原始信号 f 和经过正弦函数调制的信号 f1 和 f2 在频域上的幅度谱，abs(F)、abs(F1) 和 abs(F2) 分别表示傅里叶变换结果的模值。