In [3]:

scatter_plot([[x, len(divisors(x))] for x in range(1,200)], marker=".")

Out[3]:

In [4]:

scatter_plot([[x, prime_pi(x)] for x in range(1,1000)], marker=".")

Out[4]: