FER=[0.94,0.73,0.42,0.14,0.03,0.01,0.01,0,0,0,0];
BER=[0.051052631578947,0.021466165413534,0.008984962406015,0.001616541353383,0.00015037593985,0.000037593984962,0.000037593984962,0,0,0,0];
FER1=[0.97,0.83,0.54,0.3,0.1,0.02,0,0.01,0,0,0]
BER1=[0.065,0.039661654135338,0.01406015037594,0.005526315789474,0.001992481203008,0.000075187969925,0,0.000451127819549,0,0,0];
SNR=0:2:20;
figure;
subplot(1,2,1);
plot(SNR,FER,'r-*',SNR,FER1,'b-^');
xlabel('SNR(dB)');
ylabel('Frame error rate');
legend('Perfect','Imperfect');
grid on;
subplot(1,2,2);
plot(SNR,BER,'r-*',SNR,BER1,'b-^');
xlabel('SNR(dB)');
ylabel('Bit error rate');
legend('Perfect','Imperfect');
grid on;