rayleigh.txt

来自「关于瑞利信道」· 文本 代码 · 共 10 行

function rayrv=rayleigh(sgma)
%  rayrv=rayleigh
if nargin==0
   sgma=1;
end;
u=rand;
rayrv=sgma*(sqrt(2*log(1/(1-u))));