多队列单服务器.m

来自「一个非常好的随机多址程序,用matlab工具写的m/m/1源程序」· M 代码 · 共 39 行

N=5; %站点数
S=20; %循环次数
Lambda=0.5; %到达率
tau=2; %一个信息分组服务时间
B=0.3; %各站点间转换时间
SeT=zeros(S+1,N); %各站点服务时间
Que=zeros(S,N); %站点队长
SwT(1,1:N)=0;
for j=1:S
    for i=1:N
        tempQ=0;tempSeT=0;
         if i=1
           for r=1:N
               tempSeT=tempSeT+SeT(j,r);
            end
        else for r=i:N 
                tempSeT=tempSeT+SeT(j,r);
             end
             for t=1:i-1
                 tempSeT=tempSeT+SeT(j+1,t);
             end
        end
        sumTime=ceil(tempSeT+N*B); 
        n=poissrnd(Lambda,1,sumTime);
        for x=1:sumTiem
            tempQ=tempQ+n(x);
        end
        Que(j,i)=tempQ;
        if Que(j,i)=0
            SeT(j+1,i)=0;
        else SeT(j+1,i)=Que(j,i)*tau;
        end
    end
end
g(i)=Que(1:S,i)/S;

 SumSeT=sum(SeT(i,j):SeT(i-1,j-1));
        SumSwT=sum(SwT(i,j):SwT(i-1,j-1));