illustrations for RH book
%load code.sage
R = RiemannPiApproximation(10, 100); R
plot(lambda x : R.Tk(x,1), (10,100), plot_points=100)
R = RiemannPiApproximation(100, 500, 50)
%time g = [R.plot_Rk(k, 3, 100, plot_points=100, ymin=0, ymax=25) for k in [1,..,50]]
%time animate(g)
%time g = [R.plot_Rk(k, 3, 100, plot_points=200, ymin=0, ymax=25) for k in [1,..,100]]