% 第三章: 例 3.11:
%
n = -5:10; x = rand(1,length(n));
k = -100:100; w = (pi/100)*k;        % -pi和+pi之間的頻率
X = x * (exp(-j*pi/100)).^(n'*k);    % DTFT of x
% 折疊特性
y = fliplr(x); m = -fliplr(n);       % 信號折疊
Y = y * (exp(-j*pi/100)).^(m'*k);    % DTFT of y
% 校驗
Y_check = fliplr(X);                 % X(-w)
error = max(abs(Y-Y_check))          % 差值