% AWGN信道,維特比譯碼,(15,7) RS糾錯(cuò)碼
Eb_to_Nj_in_dB_Q1=[0,1,2,3,4,5,6,7,8,8.5,9,9.5,10,10.45];
Pb_Q1=[0.4734,0.4662,0.4635,0.4668,0.4592,0.4565,0.4342,0.3707,0.23983,0.13618,3.989e-2,5.3181e-3,3.4e-4,2.076e-5];
Eb_to_Nj_in_dB_Q4=[0,1,2,3,4,5,5.5,6,6.5,7,7.5,8];
Pb_Q4=[0.4705,0.4640,0.4557,0.4443,0.3743,0.2860,0.1946,0.0927,0.0249,5e-3,6e-4,5.68e-5];
Eb_to_Nj_in_dB_Q16=[0,1,2,3,4,4.5,5,5.5,6,6.5,7,7.5];
Pb_Q16=[0.42964,0.38575,0.24983,0.15467,0.0842,0.0557,0.0334,0.0176,5.8e-3,1.4e-3,2.68e-4,4.65e-5];
% Draw
semilogy(Eb_to_Nj_in_dB_Q1,Pb_Q1,':.',Eb_to_Nj_in_dB_Q4,Pb_Q4,':o',Eb_to_Nj_in_dB_Q16,Pb_Q16,':+');
grid on;
title('AWGN信道下(15,7)RS碼糾錯(cuò)的性能曲線');
xlabel('Eb/Nj (dB)');
ylabel('誤碼率 Pb');