经典OFDM系统的脉冲整型（ofdm pulse shaping）

经典OFDM系统的脉冲整型，包含windows和MacOSX两个版本的矩形函数整型、半余弦整型、高斯函数整型、各向同性正交变换算法（IOTA）整型的matlab源代码。

function analyse（nameimpttaunu）

% Settings
cont_v = [00.010.20.40.60.80.991];

% Impulse Shape
h = figure（）;
data = imp（t）;

plot（tdata）; grid on;
xlabel（‘t‘）; ylabel（‘Amplitude‘）;
title（[‘Amplitude of Impulse Funtion of ‘name]）;
print（h‘-dpng‘‘-r100‘[name‘-ImpShape-norm‘]）;
% print（h‘-depsc‘‘-r100‘[name‘-ImpShape-norm‘]）;

% Instantaneous Correlation Funtion
h = figure（）;
data = func_corr（imptaut）;

surf（tautdata）; shading interp;
xlabel（‘t‘）; ylabel（‘\tau‘）; zlabel（‘Amplitude‘）;
title（[‘Instantaneous Correlation Funtion of ‘name]）;
print（h‘-dpng‘‘-r100‘[name‘-Corr-norm-surf‘]）;
% print（h‘-depsc‘‘-r100‘[name‘-Corr-norm-surf‘]）;

ub = max（data（:））;
lb = min（data（:））;
v  = lb * （1 - cont_v） + ub * cont_v;

contour（tautdatav）; colorbar;
xlabel（‘t‘）; ylabel（‘\tau‘）;
title（[‘Instantaneous Correlation Funtion of ‘name]）;
print（h‘-dpng‘‘-r100‘[name‘-Corr-norm-cont‘]）;
% print（h‘-depsc‘‘-r100‘[name‘-Corr-norm-cont‘]）;

% Ambiguity Function
h = figure（）;
data = func_amb（imptaunu）;

surf（taunuabs（data））; shading interp;
xlabel（‘\nu‘）; ylabel（‘\tau‘）; zlabel（‘Amplitude‘）;
title（[‘Ambiguity Funtion of ‘name]）;
print（h‘-dpng‘‘-r100‘[name‘-Amb-norm-surf‘]）;
% print（h‘-depsc‘‘-r100‘[name‘-Amb-norm-surf‘]）;

ub = real（max（data（:）））;
lb = real（min（data（:）））;
v  = lb * （1 - cont_v） + ub * cont_v;

contour（taunudatav）; colorbar;
xlabel（‘\nu‘）; ylabel（‘\tau‘）;
title（[‘Ambiguity Funtion of ‘name]）;
print（h‘-dpng‘‘-r100‘[name‘-Amb-norm-cont‘]）;
% print（h‘-depsc‘‘-r100‘[name‘-Amb-norm-cont‘]）;

surf（taunu10*log10（abs（data）））; shading interp;
xlabel（‘\nu‘）; ylabel（‘\tau‘）; zlabel（‘Amplitude（dB）‘）;
title（[‘Ambiguity Funtion of ‘name]）;
print（h‘-dpng‘‘-r100‘[name‘-Amb-dB-surf‘]）;
% print（h‘-depsc‘‘-r100‘[name‘-Amb-dB-surf‘]）;

tmp = 10*log10（abs（data（data（:）~=0）））;
ub  = max（tmp）;
lb  = min（tmp）;
v  = lb * （1 - cont_v） + ub * cont_v;

contour（taunu10*log10（abs（data））v）; colorbar;
xlabel（‘\nu‘）; ylabel（‘\tau‘）;
title（[‘Ambiguity Funtion of ‘name]）;
print（h‘-dpng‘‘-r100‘[name‘-Amb-dB-cont‘]）;
% print（h‘-depsc‘‘-r100‘[name‘-Amb-dB-cont‘]）;

% Interference Function
h = figure（）;
data = func_int（imptaunu）;

surf（taunudata）; shading interp;
xlabel（‘\nu‘）; ylabel（‘\tau‘）; zlabel（‘Amplitude‘）;
title（[‘Interference Funtion of ‘name]）;
print（h‘-dpng‘‘-r100‘[name‘-Int-norm-surf‘]）;
% print（h‘-depsc‘‘-r100‘[name‘-Int-norm-surf‘]）;

ub = max（data（:））;
lb = min（data（:））;
v  = lb * （1 - cont_v） + ub * cont_v;

contour（taunudatav）; colorbar;
xlabel（‘\nu‘）; ylabel（‘\tau‘）;
title（[‘Interference Funtion of ‘name]）;
print（h‘-dpng‘‘-r100‘[name‘-Int-norm-cont‘]）;
% print（h‘-depsc‘‘-r100‘[name‘-Int-norm-cont‘]）;

surf（taunu10*log10（data））; shading interp;
xlabel（‘\nu‘）; ylabel（‘\tau‘）; zlabel（‘Amplitude（dB）‘）;
title（[‘Interference Funtion of ‘name]）;
print（h‘-dpng‘‘-r100‘[name‘-Int-dB-surf‘]）;
% print（h‘-depsc‘‘-r100‘[name‘-Int-dB-surf‘]）;

tmp = 10*log10（abs（data（

 属性            大小     日期    时间   名称
----------- ---------  ---------- -----  ----

     文件       6148  2013-06-29 03:06  ofdm-pulse shaping\ofdm\.DS_Store

     文件       3306  2013-06-29 03:04  ofdm-pulse shaping\ofdm\analyse.m

     文件        226  2013-06-29 01:22  ofdm-pulse shaping\ofdm\func_amb.m

     文件        208  2013-06-29 01:07  ofdm-pulse shaping\ofdm\func_corr.m

     文件         83  2013-06-29 01:07  ofdm-pulse shaping\ofdm\func_int.m

     文件        451  2013-06-28 21:02  ofdm-pulse shaping\ofdm\imp_gauss.m

     文件        482  2013-06-29 01:08  ofdm-pulse shaping\ofdm\imp_hcos.m

     文件       1112  2013-06-29 01:08  ofdm-pulse shaping\ofdm\imp_IOTA.m

     文件        471  2013-06-29 01:09  ofdm-pulse shaping\ofdm\imp_rect.m

     文件        360  2013-06-29 08:37  ofdm-pulse shaping\ofdm\report.asv

     文件        357  2013-06-29 03:07  ofdm-pulse shaping\ofdm\report.m

     文件        693  2013-06-29 01:10  ofdm-pulse shaping\ofdm\settings.mat

     文件         82  2013-06-29 03:06  ofdm-pulse shaping\__MACOSX\ofdm\._.DS_Store

     文件         82  2013-06-29 03:04  ofdm-pulse shaping\__MACOSX\ofdm\._analyse.m

     文件         82  2013-06-29 01:22  ofdm-pulse shaping\__MACOSX\ofdm\._func_amb.m

     文件         82  2013-06-29 01:07  ofdm-pulse shaping\__MACOSX\ofdm\._func_corr.m

     文件         82  2013-06-29 01:07  ofdm-pulse shaping\__MACOSX\ofdm\._func_int.m

     文件         82  2013-06-28 21:02  ofdm-pulse shaping\__MACOSX\ofdm\._imp_gauss.m

     文件         82  2013-06-29 01:08  ofdm-pulse shaping\__MACOSX\ofdm\._imp_hcos.m

     文件         82  2013-06-29 01:08  ofdm-pulse shaping\__MACOSX\ofdm\._imp_IOTA.m

     文件         82  2013-06-29 01:09  ofdm-pulse shaping\__MACOSX\ofdm\._imp_rect.m

     文件         82  2013-06-29 03:07  ofdm-pulse shaping\__MACOSX\ofdm\._report.m

     目录          0  2014-03-16 10:55  ofdm-pulse shaping\__MACOSX\ofdm

     目录          0  2014-03-16 10:55  ofdm-pulse shaping\ofdm

     目录          0  2014-03-16 10:55  ofdm-pulse shaping\__MACOSX

     目录          0  2014-03-16 10:55  ofdm-pulse shaping

----------- ---------  ---------- -----  ----

                14717                    26