%OFDM?PAPR?Reduction---PTS?Method源代碼及參考文獻(xiàn)
%******************************************************************************
%******************************SOURCE?CODE************************************
%******************************************************************************

%?PTS--PAPR?Simulation
%
%?Reference:?S.?H.?Müller?and?J.?B.?Huber?“OFDM?with?Reduced
%?Peak–to–Average?Power?Ratio?by?Optimum?Combination
%?of?Partial?Transmit?Sequences”?Elect.?Lett.?vol.?33
%?no.?5?Feb.?1997?pp.?368–69.%
%?
%?Author:?Bin?Jiang
%?National?Mobile?Communication?Research?Laboratory
%?Southeast?University?210096?Nanjing?China
%?Email:?bjiang@seu.edu.cn

clear?all;?clc;?close?all;

K?=?128;????????????????????????????????????????????????????????????????????%?SIZE?OF?FFT?
V?=?4;???????????????????????????????????????????????????????????????????????%?NUMBER?OF?SELECTIONS
QPSK_Set??=?[1?-1?j?-j];
Phase_Set?=?[1?-1];

Choose?=?[1?1?1?1;?1?1?1?2;?1?1?2?1;?1?2?1?1;?2?1?1?1;...
??????????1?1?2?2;?1?2?1?2;?1?2?2?1;?2?2?1?1;?2?1?2?1;?2?1?1?2;...
??????????2?2?2?1;?2?2?1?2;?2?1?2?2;?1?2?2?2;?2?2?2?2];
Choose_Len?=?16;??????

MAX_SYMBOLS??=?1e4;
PAPR_Orignal?=?zeros（1MAX_SYMBOLS）;
PAPR_PTS?????=?zeros（1MAX_SYMBOLS）;

for?nSymbol=1:MAX_SYMBOLS
????Index?=?randint（1Klength（QPSK_Set））+1;
????X?=?QPSK_Set（Index（1:））;???????????????????????????????????????????????%?Orignal?Frequency?domain?signal
????x?=?ifft（X[]2）;???????????????????????????????????????