Learning Guide Learning Guide

The following is the equation of the secant line.> y - p0[2] = m * ( x - p0[1] );y − e sin(1) = (esin(1+h) − e sin(1) ) (x − 1)h6.1 Introductory Calculus • 207The isolate command converts the equation to slope–intercept form.> isolate( %, y );y = (esin(1+h) − e sin(1) ) (x − 1)h+ e sin(1)You must convert the equation to a function.> secant := unapply( rhs(%), x );secant := x → (esin(1+h) − e sin(1) ) (x − 1)h+ e sin(1)You can now plot the secant and the function for different values ofh. First, make a sequence of plots.> S := seq( plot( [f(x), secant(x)], x=0..4,> view=[0..4, 0..4] ),> h=h_values ):The display command from the plots package can display the plotsin sequence, that is, as an animation.> with(plots):Warning, the name changecoords has been redefined> display( S, insequence=true, view=[0..4, 0..4] );