找回密码
 注册
关于网站域名变更的通知
查看: 660|回复: 1
打印 上一主题 下一主题

MATLAB ------- 用 MATLAB 作图讨论有限长序列的 N 点 DFT(含MATLAB脚本)

[复制链接]

该用户从未签到

跳转到指定楼层
1#
发表于 2019-12-6 09:48 | 只看该作者 |只看大图 回帖奖励 |倒序浏览 |阅读模式

EDA365欢迎您登录!

您需要 登录 才可以下载或查看,没有帐号?注册

x
MATLAB ------- 用 MATLAB 作图讨论有限长序列的 N 点 DFT(含MATLAB脚本)4 l% Y$ k8 |, w$ h: c

7 T1 T! {% F. u+ J4 y6 u$ w

* N- _4 H0 h" F4 @这篇本来是和上篇一起写的:MATLAB ------- 看看离散傅里叶级数(DFS)与DFT、DTFT及 z变换之间是什么关系  x( [0 w3 x/ L+ Z2 r. H( ^* v' e
1 ~2 y% }/ J: f5 o  O2 a8 Y
但是这篇我最初设计的是使用MATLAB脚本和图像来讨论的,而上篇全是公式,因此,还是单独成立了一篇,但是我还是希望看这篇之前还是先看看上篇。
. s( T- A, R  n$ P9 R) e" Q# e0 x5 I# a$ N* y7 q
这里默认你已经看了上篇。, U) ~: O# X) h! J1 |

( ^: \: {  l4 J: I1 H5 U* u0 U8 P本文的讨论建立在一个案例的基础上:6 H6 l3 t: D4 |) [! f# h( n% S
. H  _1 [# h3 U4 y: r( _. {
设x(n)是4点序列为:3 f8 v" }1 f3 ~3 ^* A1 ]# }( S9 u

6 Z7 `6 \/ E, B* |, Y1 X% y: L6 {
' s8 ~) a& U) Z# C# o4 J  f. \/ g
, u  y9 z! c: S8 e" X: q9 }0 G
计算x(n)的4点DFT(N =4),以及(N = 8,N = 16, N = 128)
2 Q8 ?( }: m( u- d4 X" ?0 E* r( P! Y: M; r

+ I- k# N* Q5 P! k2 E& J; y我们知道DFS是在DTFT上的频域采样,采样间隔为 2*pi / N.
5 }! l( s* r% d' {' s) w
7 j. f8 J' J" k( E3 @DFT 是一个周期的DFS,因此DFT也是在DTFT上的频域采样,采样间隔同样为 2 * pi / N.
( X" i) b( X2 t5 {% @9 Y- a/ ]& N* R( g/ k
x(n)的波形图为:
2 w/ B# P$ T" C8 K' v) L; ~. j3 u: Q1 b8 {8 _( Y  {5 l6 G) M% Y2 [
  • clc;clear;close all;
  • % x(n)
  • N = 4;
  • n = 0:N-1;
  • x = [1,1,1,1];
  • stem(n,x);
  • title('Discrete sequence');
  • xlabel('n');ylabel('x(n)');
  • xlim([0,5]);ylim([-0.2,1.2]);
    0 R4 t2 R5 }: m+ R7 f# k
  : l2 E0 I$ C- w! r& z

: [* C1 G; d, Q( _! X, B

0 M5 [+ U! n5 ?; u# S/ ^
! |  K8 f* N+ i9 R我们先作出 x(n) 的 DTFT,也即是离散时间傅里叶变换,给出脚本和图像:
/ F3 }$ P) @/ X: L
( |# b& T% D! t/ o
  • clc;clear;close all;
  • % x(n)
  • N = 4;
  • n = 0:N-1;
  • x = [1,1,1,1];
  • stem(n,x);
  • title('Discrete sequence');
  • xlabel('n');ylabel('x(n)');
  • xlim([0,5]);ylim([-0.2,1.2]);
  • %Discrete-time Fourier Transform
  • K = 500;
  • k = 0:1:K;
  • w = 2*pi*k/K; %plot DTFT in [0,2pi];
  • X = x*exp(-j*n'*w);
  • % w = [-fliplr(w),w(2:K+1)];   %plot DTFT in [-pi,pi]
  • % X = [fliplr(X),X(2:K+1)];    %plot DTFT in [-pi,pi]
  • magX = abs(X);
  • angX = angle(X)*180/pi;
  • figure
  • subplot(2,1,1);
  • plot(w/pi,magX);
  • title('Discrete-time Fourier Transform in Magnitude Part');
  • xlabel('w in pi units');ylabel('Magnitude of X');
  • subplot(2,1,2);
  • plot(w/pi,angX);
  • title('Discrete-time Fourier Transform in Phase Part');
  • xlabel('w in pi units');ylabel('Phase of X ');
    0 E( C5 ?: j1 ~8 u) o
   4 r- J' C# |' Z, j

' q6 x* J+ `* j! a
; A/ p" L' @. {; h
+ h. l) z$ L2 g3 b

) L, N" d& _* S; X* g, Q" L, o+ w2 b: G: n- I3 V
当N = 4时候的DFT,为了显示出DFT和DTFT之间的关系,我们把DTFT图形和DFT画到了同一张图上:
+ ?& w3 R* s/ g3 P+ d9 V* ~. u' |! r- h' C8 y: w" ?
  • clc;clear;close all;
  • % x(n)
  • N = 4;
  • n = 0:N-1;
  • x = [1,1,1,1];
  • %Discrete-time Fourier Transform
  • K = 500;
  • k = 0:1:K;
  • w = 2*pi*k/K; %plot DTFT in [0,2pi];
  • X = x*exp(-j*n'*w);
  • magX = abs(X);
  • angX = angle(X)*180/pi;
  • %DFT in N = 4
  • k = 0:N-1;
  • Xk = dft(x,N);
  • magXk = abs(Xk);
  • phaXk = angle(Xk) * 180/pi;   %angle 。
  • k = 2*pi*k/N;          % k in DFT is equal to 2*pi*k/N in DTFT
  • figure
  • subplot(2,1,1);
  • stem(k/pi,magXk);
  • title('DFT Magnitude of x(n) when N = 4');
  • xlabel('k');ylabel('Magnitude Part');
  • % Auxiliary mapping, highlighting the relationship between DFT and DTFT
  • hold on
  • plot(w/pi,magX,'g');
  • hold off
  • subplot(2,1,2);
  • stem(k/pi,phaXk);
  • title('DFT Phase of x(n) when N = 4');
  • xlabel('k');ylabel('Phase Part');
  • % Auxiliary mapping, highlighting the relationship between DFT and DTFT
  • hold on
  • plot(w/pi,angX,'g');
  • hold off
    / @# o+ x  C* d1 W1 z) ~
            
8 z! u2 o5 e  z* c
+ ]3 N  J9 _2 V
. S) [9 C/ h: {+ v

, x/ b! ]* e* T' L' o( L可见,DFT是DTFT上的等间隔采样点。0 d3 ?) H( X9 d8 {

" z3 |; D* J+ B& F
, n( n" n& ~' t当N = 8时候的DFT,为了显示出DFT和DTFT之间的关系,我们把DTFT图形和DFT画到了同一张图上:. i% D" H, L/ P3 w% H2 t* n5 Y0 f3 K/ W

/ s5 ~6 q1 d& w% f  u8 B
  • clc;clear;close all;
  • % x(n)
  • N = 4;
  • n = 0:N-1;
  • x = [1,1,1,1];
  • %Discrete-time Fourier Transform
  • K = 500;
  • k = 0:1:K;
  • w = 2*pi*k/K; %plot DTFT in [0,2pi];
  • X = x*exp(-j*n'*w);
  • magX = abs(X);
  • angX = angle(X)*180/pi;
  • % Zero padding into N = 8 and extended cycle
  • N = 8;
  • x = [1,1,1,1,zeros(1,4)];
  • %DFT in N = 8
  • k = 0:N-1;
  • Xk = dft(x,N);
  • magXk = abs(Xk);
  • phaXk = angle(Xk) * 180/pi;   %angle 。
  • k = 2*pi*k/N;          % k in DFT is equal to 2*pi*k/N in DTFT
  • figure
  • subplot(2,1,1);
  • stem(k/pi,magXk);
  • title('DFT Magnitude of x(n) when N = 8');
  • xlabel('k');ylabel('Magnitude Part');
  • % Auxiliary mapping, highlighting the relationship between DFT and DTFT
  • hold on
  • plot(w/pi,magX,'g');
  • hold off
  • subplot(2,1,2);
  • stem(k/pi,phaXk);
  • title('DFT Phase of x(n) when N = 8');
  • xlabel('k');ylabel('Phase Part');
  • % Auxiliary mapping, highlighting the relationship between DFT and DTFT
  • hold on
  • plot(w/pi,angX,'g');
  • hold off
    / P; w) K8 D' P/ V# s, r; @. v$ [
            
; P* G3 E1 _1 Z  H5 R; x
' J1 t& k5 a8 Z! ~* z$ @" R

) z8 k# G- ^$ w" ?' W! y; V9 J0 |7 i' n/ |$ e0 ]- }7 h- X5 W" k
相比于N =4,N =8采样点数更密集了。- v3 T* F$ `. M5 h6 F1 q  f
3 B0 \- Z% ?# z# C7 I$ j- U4 L
当N = 16时候的DFT,为了显示出DFT和DTFT之间的关系,我们把DTFT图形和DFT画到了同一张图上:& W' |  i7 ]3 P. O% [7 R

! O: N% v+ P& ?7 {$ W( p
  • clc;clear;close all;
  • % x(n)
  • N = 4;
  • n = 0:N-1;
  • x = [1,1,1,1];
  • %Discrete-time Fourier Transform
  • K = 500;
  • k = 0:1:K;
  • w = 2*pi*k/K; %plot DTFT in [0,2pi];
  • X = x*exp(-j*n'*w);
  • magX = abs(X);
  • angX = angle(X)*180/pi;
  • % Zero padding into N = 16 and extended cycle
  • N = 16;
  • x = [1,1,1,1,zeros(1,12)];
  • %DFT in N = 16
  • k = 0:N-1;
  • Xk = dft(x,N);
  • magXk = abs(Xk);
  • phaXk = angle(Xk) * 180/pi;   %angle 。
  • k = 2*pi*k/N;          % k in DFT is equal to 2*pi*k/N in DTFT
  • figure
  • subplot(2,1,1);
  • stem(k/pi,magXk);
  • title('DFT Magnitude of x(n) when N = 16');
  • xlabel('k');ylabel('Magnitude Part');
  • % Auxiliary mapping, highlighting the relationship between DFT and DTFT
  • hold on
  • plot(w/pi,magX,'g');
  • hold off
  • subplot(2,1,2);
  • stem(k/pi,phaXk);
  • title('DFT Phase of x(n) when N = 16');
  • xlabel('k');ylabel('Phase Part');
  • % Auxiliary mapping, highlighting the relationship between DFT and DTFT
  • hold on
  • plot(w/pi,angX,'g');
  • hold off# C+ P2 J3 d9 M2 ~
             4 i9 t, b/ `% [
' Y" {5 y; E7 \7 H1 ~8 O

7 |0 w; Q: p, }4 W: m
; I9 A! r' ]* {$ l, I  i& uN = 128的情况:
8 m  C, e: u) r2 s0 g; \% X+ H! S
  • clc;clear;close all;
  • % x(n)
  • N = 4;
  • n = 0:N-1;
  • x = [1,1,1,1];
  • %Discrete-time Fourier Transform
  • K = 500;
  • k = 0:1:K;
  • w = 2*pi*k/K; %plot DTFT in [0,2pi];
  • X = x*exp(-j*n'*w);
  • magX = abs(X);
  • angX = angle(X)*180/pi;
  • % Zero padding into N = 128 and extended cycle
  • N = 128;
  • x = [1,1,1,1,zeros(1,124)];
  • %DFT in N = 128
  • k = 0:N-1;
  • Xk = dft(x,N);
  • magXk = abs(Xk);
  • phaXk = angle(Xk) * 180/pi;   %angle 。
  • k = 2*pi*k/N;          % k in DFT is equal to 2*pi*k/N in DTFT
  • figure
  • subplot(2,1,1);
  • stem(k/pi,magXk);
  • title('DFT Magnitude of x(n) when N = 128');
  • xlabel('k');ylabel('Magnitude Part');
  • % Auxiliary mapping, highlighting the relationship between DFT and DTFT
  • hold on
  • plot(w/pi,magX,'g');
  • hold off
  • subplot(2,1,2);
  • stem(k/pi,phaXk);
  • title('DFT Phase of x(n) when N = 128');
  • xlabel('k');ylabel('Phase Part');
  • % Auxiliary mapping, highlighting the relationship between DFT and DTFT
  • hold on
  • plot(w/pi,angX,'g');
  • hold off

  • $ y9 L# j5 l6 W/ k- x
             ( V: P4 ]8 Y( W, @# o4 D' ~; g

8 J2 y) N7 F1 F) g
1 Q0 U$ T0 S3 F  |' Q$ J/ ~4 m- m可见,随着周期N 的增大,采样点越密集。
, |3 W- Q5 R4 f) D6 Y: D5 V) f6 C5 m8 a# A& e6 u
2 p8 G% x* M' y5 F( E* [. i
上面的程序都是我在我写的一个大程序中抽取出来的,最后给出所有程序的一个集合,也就是我最初写的一个程序:1 B9 H+ A0 o* i: D* W& x
( B8 z" O. U+ \/ J- P- N! Q  N# |1 I& q
  • clc;clear;close all;
  • % x(n)
  • N = 4;
  • n = 0:N-1;
  • x = [1,1,1,1];
  • stem(n,x);
  • title('Discrete sequence');
  • xlabel('n');ylabel('x(n)');
  • xlim([0,5]);ylim([-0.2,1.2]);
  • %Discrete-time Fourier Transform
  • K = 500;
  • k = 0:1:K;
  • w = 2*pi*k/K; %plot DTFT in [0,2pi];
  • X = x*exp(-j*n'*w);
  • % w = [-fliplr(w),w(2:K+1)];   %plot DTFT in [-pi,pi]
  • % X = [fliplr(X),X(2:K+1)];    %plot DTFT in [-pi,pi]
  • magX = abs(X);
  • angX = angle(X)*180/pi;
  • figure
  • subplot(2,1,1);
  • plot(w/pi,magX);
  • title('Discrete-time Fourier Transform in Magnitude Part');
  • xlabel('w in pi units');ylabel('Magnitude of X');
  • subplot(2,1,2);
  • plot(w/pi,angX);
  • title('Discrete-time Fourier Transform in Phase Part');
  • xlabel('w in pi units');ylabel('Phase of X ');
  • %DFT in N = 4
  • k = 0:N-1;
  • Xk = dft(x,N);
  • magXk = abs(Xk);
  • phaXk = angle(Xk) * 180/pi;   %angle 。
  • k = 2*pi*k/N;          % k in DFT is equal to 2*pi*k/N in DTFT
  • figure
  • subplot(2,1,1);
  • stem(k/pi,magXk);
  • title('DFT Magnitude of x(n) when N = 4');
  • xlabel('k');ylabel('Magnitude Part');
  • % Auxiliary mapping, highlighting the relationship between DFT and DTFT
  • hold on
  • plot(w/pi,magX,'g');
  • hold off
  • subplot(2,1,2);
  • stem(k/pi,phaXk);
  • title('DFT Phase of x(n) when N = 4');
  • xlabel('k');ylabel('Phase Part');
  • % Auxiliary mapping, highlighting the relationship between DFT and DTFT
  • hold on
  • plot(w/pi,angX,'g');
  • hold off
  • % Zero padding into N = 8 and extended cycle
  • N = 8;
  • x = [1,1,1,1,zeros(1,4)];
  • %DFT in N = 8
  • k = 0:N-1;
  • Xk = dft(x,N);
  • magXk = abs(Xk);
  • phaXk = angle(Xk) * 180/pi;   %angle 。
  • k = 2*pi*k/N;          % k in DFT is equal to 2*pi*k/N in DTFT
  • figure
  • subplot(2,1,1);
  • stem(k/pi,magXk);
  • title('DFT Magnitude of x(n) when N = 8');
  • xlabel('k');ylabel('Magnitude Part');
  • % Auxiliary mapping, highlighting the relationship between DFT and DTFT
  • hold on
  • plot(w/pi,magX,'g');
  • hold off
  • subplot(2,1,2);
  • stem(k/pi,phaXk);
  • title('DFT Phase of x(n) when N = 8');
  • xlabel('k');ylabel('Phase Part');
  • % Auxiliary mapping, highlighting the relationship between DFT and DTFT
  • hold on
  • plot(w/pi,angX,'g');
  • hold off
  • % Zero padding into N = 16 and extended cycle
  • N = 16;
  • x = [1,1,1,1,zeros(1,12)];
  • %DFT in N = 16
  • k = 0:N-1;
  • Xk = dft(x,N);
  • magXk = abs(Xk);
  • phaXk = angle(Xk) * 180/pi;   %angle 。
  • k = 2*pi*k/N;          % k in DFT is equal to 2*pi*k/N in DTFT
  • figure
  • subplot(2,1,1);
  • stem(k/pi,magXk);
  • title('DFT Magnitude of x(n) when N = 16');
  • xlabel('k');ylabel('Magnitude Part');
  • % Auxiliary mapping, highlighting the relationship between DFT and DTFT
  • hold on
  • plot(w/pi,magX,'g');
  • hold off
  • subplot(2,1,2);
  • stem(k/pi,phaXk);
  • title('DFT Phase of x(n) when N = 16');
  • xlabel('k');ylabel('Phase Part');
  • % Auxiliary mapping, highlighting the relationship between DFT and DTFT
  • hold on
  • plot(w/pi,angX,'g');
  • hold off
  • % Zero padding into N = 128 and extended cycle
  • N = 128;
  • x = [1,1,1,1,zeros(1,124)];
  • %DFT in N = 128
  • k = 0:N-1;
  • Xk = dft(x,N);
  • magXk = abs(Xk);
  • phaXk = angle(Xk) * 180/pi;   %angle 。
  • k = 2*pi*k/N;          % k in DFT is equal to 2*pi*k/N in DTFT
  • figure
  • subplot(2,1,1);
  • stem(k/pi,magXk);
  • title('DFT Magnitude of x(n) when N = 128');
  • xlabel('k');ylabel('Magnitude Part');
  • % Auxiliary mapping, highlighting the relationship between DFT and DTFT
  • hold on
  • plot(w/pi,magX,'g');
  • hold off
  • subplot(2,1,2);
  • stem(k/pi,phaXk);
  • title('DFT Phase of x(n) when N = 128');
  • xlabel('k');ylabel('Phase Part');
  • % Auxiliary mapping, highlighting the relationship between DFT and DTFT
  • hold on
  • plot(w/pi,angX,'g');
  • hold off9 l( R1 g* ?0 e) b% n
                                1 l+ L/ `1 R9 {

* u6 K! B; g. o5 t: Q& P$ p4 ]: {$ \- B最后需要说明的是上面通过补零的方式来增大最初给出的有限长序列的周期,这样只会更加DFT在DTFT上的采样间隔,也就是频率分辨率。0 R8 \! F9 {) Q- H# K
4 b' B/ s1 M3 Z3 T+ X
补零给出了一种高密度的谱并对画图提供了一种更好的展现形式。- k$ N# W4 Y( W) q# y

3 U8 g/ P+ _+ S9 a: H但是它并没有给出一个高分辨率的谱,因为没有任何新的信息附加到这个信号上;而仅是在数据中添加了额外的零值。
3 J' [# a4 y( h/ @: H5 H6 z# m# m3 u
下篇我们继续说明,如何才能得到高分辨率的谱,我们的方法是从实验中或观察中获得更多的数据。
' N! H( Y& x" P  f7 N9 J3 v/ ?2 ~' q2 ?- j3 `/ W

# O  F, l* J3 ?0 A* ~( B$ g

6 ?* X$ r: `2 G4 }9 x

该用户从未签到

2#
发表于 2019-12-6 17:54 | 只看该作者
小弟要好好像大哥学习呀
您需要登录后才可以回帖 登录 | 注册

本版积分规则

关闭

推荐内容上一条 /1 下一条

EDA365公众号

关于我们|手机版|EDA365电子论坛网 ( 粤ICP备18020198号-1 )

GMT+8, 2025-8-4 19:47 , Processed in 0.156250 second(s), 26 queries , Gzip On.

深圳市墨知创新科技有限公司

地址:深圳市南山区科技生态园2栋A座805 电话:19926409050

快速回复 返回顶部 返回列表