Matlab - Graficar expresion probabilidad de error PE

R=2:2:1000;

P=1/2;

exp=((1./R).*P.*(((R-1)./R)+.5));

plot(R,exp)

clear all,close all,

R = 1:100;

P=1/2;

for n = 1:100

    if mod(1/R(n),2) == 1 % condición, si 1/R es impar

        exp(n) = nan;

%     elseif R(n)> 1

%             

%         exp(n) = nan;

    elseif mod(R(n),2) == 1 % condición, si R es impar

        exp(n)=((1/R(n))*P*(((R(n)-1)/R(n))+.5));

    else

        exp(n) = nan;

    end

end

plot(R,exp,'o')