papr_display_4_db.m

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

% figure
% sim('IDMA_4spread_1024');
hold off
% hold on
counter=zeros(1,91);
for k=30:120,
    for l=1:length(papr)
        if(papr(l)>k/10)
            counter(1,(k-30)+1)=counter(1,(k-30)+1)+1;
        end
    end
end
papr_length=length(papr);
semilogy(3:0.1:12,counter(1,:)/papr_length,'g');
% figure1
hold on
counter1=zeros(1,91);
for k=30:120,
    for l=1:length(papr1)
        if(papr1(l)>k/10)
            counter1(1,(k-30)+1)=counter1(1,(k-30)+1)+1;
        end
    end
end
papr_length1=length(papr1);
semilogy(3:0.1:12,counter1(1,:)/papr_length1,'b');
% figure2
hold on
counter2=zeros(1,91);
for k=30:120,
    for l=1:length(papr2)
        if(papr2(l)>k/10)
            counter2(1,(k-30)+1)=counter2(1,(k-30)+1)+1;
        end
    end
end
papr_length2=length(papr2);
semilogy(3:0.1:12,counter2(1,:)/papr_length2,'r');
% figure3
hold on
counter3=zeros(1,91);
for k=30:120,
    for l=1:length(papr3)
        if(papr3(l)>k/10)
            counter3(1,(k-30)+1)=counter3(1,(k-30)+1)+1;
        end
    end
end
papr_length3=length(papr3);
semilogy(3:0.1:12,counter3(1,:)/papr_length3,'y');

% counter2=zeros(1,91);
% for k=30:120,
%     for l=1:length(papr_one2_no),
%         if(papr_one2_no(l)>k/10)
%             counter2(1,(k-30)+1)=counter2(1,(k-30)+1)+1;
%         end
%     end
% end
% papr_length2=length(papr_one2_no);
% semilogy([3:0.1:12],counter2(1,:)/papr_length2,'y');
% 
% counter22=zeros(1,91);
% for k=30:120,
%     for l=1:length(papr_one2_ss),
%         if(papr_one2_ss(l)>k/10)
%             counter22(1,(k-30)+1)=counter22(1,(k-30)+1)+1;
%         end
%     end
% end
% papr_length22=length(papr_one2_ss);
% semilogy([3:0.1:12],counter22(1,:)/papr_length22,'g');