producercs.m

共上载5个源码

function rcs=producercs(meanrcs, N,M);
if nargin<3,M=10000; end
if nargin<2 N=1;   end
if nargin<1 meanrcs=10; end
prorand=producerand(N,M);
rcs=-meanrcs*log(prorand);