plot [log((1/(i*(10^x)+1))), {x, -2, 2}]