papr_acculation.m

MIMO OFDM 2发2收通过simulink实现的基本链路

function f=papr_acculation(u)
for k=1:length(u)
    sqrt_u(k,1)=power(abs(u(k,1)),2);
end
% mean_sqrt_a=mean(sqrt_a);
% mean_sqrt_a_max=max(sqrt_a);
% papr=max(sqrt_a)/mean(sqrt_a)
f=10*log10(max(sqrt_u)/mean(sqrt_u));