lancanica

In[106]:=

RowBox[{Plot, [, RowBox[{1/2Cosh[2x], ,, {x, -1, 1}, ,, RowBox[{PlotRange, , RowBox[{{ ... wBox[{{, RowBox[{RowBox[{-, 0.25}], ,, 1.5}], }}]}], }}]}], ,, AspectRatioAutomatic}], ]}]

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

Out[106]=

⁃Graphics⁃

In[107]:=

RowBox[{Show, [, RowBox[{RowBox[{Table, [, RowBox[{RowBox[{ParametricPlot, [, RowBox[{{a * Cos ... RowBox[{a, ,, 0.5, ,, 1.5, ,, 0.5}], }}]}], ]}], ,, DisplayFunction$DisplayFunction}], ]}]

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

Out[107]=

⁃Graphics⁃


Created by Mathematica  (April 30, 2004)