LogLinearPlot[ (100* (1-(1-0.1365)^n)), {n,1,100}]