In[103]:=

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

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

Out[103]=

-Graphics -


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