In[88]:=

Plot[2x + 1 - Abs[x + 1], {x, -2, 3}, Ticks→ {Range[-2, 3], Range[-5, 3]}, AspectRatio→Automatic]

[Graphics:../HTMLFiles/index_21.gif]

Out[88]=

-Graphics -


Created by Mathematica  (June 17, 2006) Valid XHTML 1.1!