PAPR问题的MATLAB程序:
附录1:分三个子块
%一一一一一一一一一一一一一一一一一一一一一一一一一一一一一一一一一一一一一一一一%
%%
%程序PAPR%
%%
%分3个子块%
%一一一一一一一一一一一一一一一一一一一一一一一一一一一一一一一一一一一一一一一一%
clc;
clear;
V=3;%分3个子块
H=4:
i=0;
temp=0;
tempt=0;
num=1;
%一一一一一一一一一一一一一一一一一一一一一一一一一一一一一一一一一一一一一一一一一一一一一一一一
%传统算法
for N=3:3:33
x=1;
%一一一一一一一一一一一一一一一一一一一一一一一一一
%
for
修正因子的取值范围
i二1:H
V alue(i)=2*(i一1) *pi/H;
end
%一一一一一一一一一一一一一一一一一一一一一一一一一
%输入符号序列
for i=1:N
Ck (i) -round (rand (1)):
end
%一一一一一一一一一一一一一一一一一一一一一一一一一
if(N二二1)
Fi (1)=0;
end
if(N>1)
Fi(1)=0;
for iii二1:H
Fi (2)二Value (iii);
for i=1:H