function anti_main(N)
r=zeros(N,8);
c=zeros(N,8);
n=zeros(N,8);

%for m=1:8
    F=2^4;
    for i=1:100
        for j=1:N
            [Nc,Nr,Nn]=anti_collision(j,F);
            r(j,4)=Nr+r(j,4);
            c(j,4)=Nc+c(j,4);
            n(j,4)=Nn+n(j,4);
        end
        
    end
    r(:,4)=r(:,4)/(100*F);
    c(:,4)=c(:,4)/(100*F);
    n(:,4)=n(:,4)/(100*F);
%end

j=1:N;
hold on
%plot(c(:,1),'b');
%plot(c(:,2),'c');
%plot(c(:,3),'g');
plot(r(:,4),'o');
plot(c(:,4));
plot(n(:,4),'--');
xlabel('The number of tags N');
ylabel('Ratio');
gtext('The frame size F=16');
legend('Pr','Pc','Pn',0);
%plot(c(:,5),'m');
%plot(c(:,6),'r');
%plot(c(:,7),'b.');
%plot(c(:,8),'y');
end