expdis.m

来自「802.11无线网络通信中基本CSMA/CA基本方式和RTS/CTS的仿真实现比」· M 代码 · 共 7 行

%泊松数据源
function y = ExpDis(a)
y=0;
while y == 0
    A = rand(1);%（0,1）的随机数
    y = floor((-a) * log(1-A));
end