reliability.asv

来自「无线传感器网络的可靠路由算法」· ASV 代码 · 共 27 行

r=zeros(6,11);
for l=1:6
    x=0;
    for p=0:0.1:1
        x=x+1;
        suc=0;
        for i=1:1000
            count=0;
            for j=1:8+2^(l-1)
                a=rand();
                if a>p
                   count=count+1;
                end
            end
            if count>=8
               suc=suc+8;
            end
        end
        r(l,x)=1-suc/8000;
    end
end
p=[0:0.1:1];
plot(p,r(1,:),'-o',p,r(2,:),'-+',p,r(3,:),'-*',p,r(4,:),'-s',p,r(5,:),'-d',p,r(6,:),'-p');
xlabel('raw loss rate');
ylabel('final loss rate');
legned 1 2 4 8 16 64 127
grid;