list = Table[{x, ???[x]},{x, - 3 Pi/2, 3 Pi/2 , Pi/ 4}];
<< Graphics`MultipleListPlot`
MultipleListPlot[
{ {- 3 Pi/2,?},{- 5 Pi/4,?},{- Pi,?},{- 3 Pi/4,?},
{- Pi/2,?},{- Pi/4,?},{0,?},{Pi/4,?},{Pi/2,?},
{3 Pi/4,?},{Pi,?},{5 Pi/4,?},{3 Pi/2,?} },
list,
SymbolStyle->{Hue[0.7], Hue[0.9]}, AxesLabel->{x, y},
Background->GrayLevel[0.9], PlotLegend -> {"Derivative", "Guess"},
PlotJoined -> {False, True},
SymbolShape -> {PlotSymbol[Box,3.5], PlotSymbol[Triangle, 5]}
];
Return to
coordinate grid page:
http://www.uta.edu/math/Calculus/secant.html
or to Lab I.2:
http://www.uta.edu/math/Calculus/calc1-lab2.html.