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