16QAM调制解调 为啥实际和理论误码率差这么多

 改好了，想要的可私聊

%% 16QAM实现
clc;clear;close all;
% ===================== 16QAM 参数设定================
sps = 16;           % 上采样倍数
fc = 2000;          % 载波频率
fs = 16000;         % 采样频率
 
% =======================发射机================
% 产生原始信息序列
signal_bit = randi([0 1],1,2000);
% QPSK调制
% mod = comm.QPSKModulator('BitInput',true);
% demod = comm.QPSKDemodulator('BitOutput',true);  % qpsk解调器

signal_mod = qammod(signal_bit.',16,'InputType', 'bit','UnitAveragePower',true);
% 脉冲成型
% 插值（上采样）
up16_signal_mod = upsample(signal_mod.',sps);
% 滚降滤波器
r_factor =