plot(log(x), (x, -5, 5), adaptive=True)
