saleh.m

来自「实现了高斯噪声下APSK的BER仿真」· M 代码 · 共 11 行

function y=saleh(x)
%   HPA_apsk(n)=saleh(z_apsk(n));
Aa=2;
Ba=1;
Ap=1;
Bp=1;
r=abs(x);
p=angle(x);
Ar=Aa*r/(1+Ba*r*r);
Pr=(pi/3)*Ap*r*r/(1+Bp*r*r);
y=Ar*exp(j*(p+Pr));