A Riemann Sum, Left, Midpoint, and Right

You can animate each one on the "live" worksheet.

>

restart:

>	with(plots):

Warning, the name changecoords has been redefined

>	with(Student[Calculus1]):

>	ApproximateInt(x^2+1,x=0..2,method=left,color=blue,partition=4,output=animation,iterations=8);

>	ApproximateInt(x^2+1,x=0..2,method=right,color=blue,partition=4,output=animation,iterations=8);

>	ApproximateInt(x^2+1,x=0..2,method=midpoint,color=blue,partition=4,output=animation,iterations=8);

>