randcl.m

来自「伪随机数发生器: “利用随机序列进行间隔控制」· M 代码 · 共 7 行

function randmtx=randCL(row,col,seed,u)
randmtx(1,1)=seed;
for i=2:row*col
    randmtx(1,i)=u*randmtx(1,i-1)*(1-randmtx(1,i-1));
end
randmtx=reshape(randmtx,row,col);