zhijiexuebo.m

64路OFDM系统MATLAB仿真

function [paprchuli]=zhijiexuebo(xinxi)
max_papr=8;%%%%%%%%%%%%%%%%%%(单位dB)

max_papr_10=10^(max_papr/10); %%%%%%%%%%%转化为十进制


paprchuli=xinxi;

nengliang=xinxi.*conj(xinxi);%%%%%%%%%计算能能量
mean=sum(nengliang)/length(xinxi);%%%%%%%%%%%计算平均能量



for xulie=1:length(xinxi)
   if  nengliang(xulie)/mean  >max_papr_10%%%%%%%%%%%%%%%%%%%如果信号能量比平局能量比值大于 PAPR
       
      paprchuli(xulie) = paprchuli(xulie)*sqrt( max_papr_10/( nengliang(xulie)/mean));%%%%%%%%%%%%%%%则将其限幅至最大忍受程度
       
   end
end