Lab2A,Ex4 - (* Content-type: application/mathematica *) (*...

Info iconThis preview shows pages 1–3. Sign up to view the full content.

View Full Document Right Arrow Icon
(* Content-type: application/mathematica *) ( (*** Wolfram Notebook File ***) (* http://www.wolfram.com/nb *) ( (* CreatedBy='Mathematica 6.0' *) ( (*CacheID: 234*) (* Internal cache information: NotebookFileLineBreakTest NotebookFileLineBreakTest NotebookDataPosition[ 145, 7] NotebookDataLength[ 439921, 7184] NotebookOptionsPosition[ 439554, 7167] NotebookOutlinePosition[ 439896, 7182] CellTagsIndexPosition[ 439853, 7179] WindowFrame->Normal ContainsDynamic->False*) C (* Beginning of Notebook Content *) Notebook[{ N Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{"Clear", "[", RowBox[{"f", ",", "x", ",", "y"}], "]"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"f", "[", RowBox[{"x_", ",", "y_"}], "]"}], "=", RowBox[{"2", "y", "*", RowBox[{"Log", "[", RowBox[{ RowBox[{"x", "^", "2"}], "+", RowBox[{"y", "^", "2"}]}], "]"}]}]}], "\n", RowBox[{" ", RowBox[{"Plot3D", "[", RowBox[{ RowBox[{"f", "[", RowBox[{"x", ",", "y"}], "]"}], ",", RowBox[{"{", RowBox[{"x", ",", RowBox[{"-", "1"}], ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"y", ",", RowBox[{"-", "1"}], ",", "1"}], "}"}], ",", RowBox[{"AxesLabel", "\[Rule]", RowBox[{"{", RowBox[{"\"\<X\>\"", ",", "\"\<Y\>\"", ",", "\"\<Z\>\""}], "}"}]}], ",", RowBox[{"PlotPoints", "\[Rule]", "60"}]}], "]"}]}]}], "Input", CellChangeTimes->{{3.442851182875*^9, 3.4428512520625*^9}}], Cell[BoxData[ RowBox[{"2", " ", "y", " ", RowBox[{"Log", "[", RowBox[{ SuperscriptBox["x", "2"], "+", SuperscriptBox["y", "2"]}], "]"}]}]], "Output",
Background image of page 1

Info iconThis preview has intentionally blurred sections. Sign up to view the full version.

View Full DocumentRight Arrow Icon
CellChangeTimes->{{3.44285124546875*^9, 3.44285125246875*^9}}], Cell[BoxData[ Graphics3DBox[GraphicsComplex3DBox[CompressedData[" 1:eJxcnXVUVdvbhcUOrt3dXvvaLQZid4vd3S3GVbGu3dhiYXdggaIIFopiIYgt KCIq9r1+v8Gac65v8NcZPMNxzt5rve/jOXOvvXaB3iPa9EucKFEi7zyJEiX5 3+vQP25E//4d48PX4/99uVGvzBefUrvHpGwR9V78ddydJ5uyx/m8c85ZaMPd aPHuxTw3tU7y2WdfhG+tqPPvxDvN/eOF9/uPPkPdBnSquvuteExw8s9OobE+ pbKnHTNnRZR4xlXbEncI/ODz7uixRXenRopX8djTPXZ0jM++lq5eBQe+EZ++ 7FVE907/O463Dn4j27wWn3V2UnAO57c+peZ6hZ2v+Uo85S3nht2rRPq8K9jy m2Oxl+L7j+9vNr3Ca5995+MyumZ4Id7W5eO5V9X+9++6bCi9++cz8atNnA5m bvbcp9SXeo2+vnwqHpFta7dNQ576vFsW2bvBrQjx2FwNC3eu+MSno2v+n0XH PRFf06ZX0McjoT73lg/7y69xmHjzVi2vrevwwKf91dP9euQNFffrHRn4tWCI z12HlOt/fnwgfqzg/HHncgX7tK3W/taaK/fEv29ttdd5/k2f4JGeySpuuCte 8XvEAa96gT6tvWKq3xoZLD50RA3nB4Mv+dx6UnPk0Aa3xP13rXx9PqWvz6Yy mZtmqHhdfHfJwJ7XGpzy2bDxwPHGYVfEV9Vxm7xv2mGfdY6N88+c4yd+Ll2O It8W7fL566t/lnE9zot3ydxniMeWDT6lQn5GvTx8XPxGmMsi75aLfFr37zVj f8o94usc1m/7VnScz0rn1e3zui4TP3I7T+o7t+v5TK4fz50S8kv94t9HfP3v dfHv8+pu/Oc6JfzcqC/xxyn+OJM5zgnmvMTr4LwmmXEQH49xmGLGTXwoxu28 GWdxL4yzk5kX+/6YF18zj+IpMY91zbyLB2HeL5o6EfdAndQ3dSV+EHV1ydSh eHnUYQNTt+ITULfPTZ2L30adFzJ9IX4XfdHH9JH4GfTRNtN34vXQd89Nn4pv QJ8WMn0t/jXI9HUf4wHxUfDANuMN8WHwxnPjGfGi8Ewh4yU7zvBSH+Mx8Vfw 2DbjPfGW8N5z40nx9vBkIeNV8XB4FX+L08P8mz4+NyJg4sJen/U3X7v3DQ54 0/ST/Ex++0H/sAaVP8rP4qvPJ0pUIFZ+Jt+c6WPHqY4f5Gfy2oMGpOj2MVp+ Jn/4JfvovEFv5Wdy78jdHs0PRcrP5Pda1eqYYc1r+Zl80Yjew3bPfik/k3s9 cf05fPJz+Zl8Y+fQ1XcnPZWfyXvn7xRzLeUT+Zl83Bwnp8VVQuVn8kYdRtzu N+u+/Ew+6OukgNiYO/Iz+fthlWM+z7glP5Nn3z9004axV+Vn8rJhrQtEOF2S
Background image of page 2
Image of page 3
This is the end of the preview. Sign up to access the rest of the document.

This note was uploaded on 03/07/2011 for the course MATH 2374 taught by Professor Mosher during the Spring '07 term at Minnesota.

Page1 / 122

Lab2A,Ex4 - (* Content-type: application/mathematica *) (*...

This preview shows document pages 1 - 3. Sign up to view the full document.

View Full Document Right Arrow Icon
Ask a homework question - tutors are online