Simple 3D Graph
- To: mathgroup at smc.vnet.net
- Subject: [mg7288] Simple 3D Graph
- From: mam94006 at uconnvm.uconn.edu (Manuel A. Morales)
- Date: Thu, 22 May 1997 09:19:40 -0400 (EDT)
- Organization: University of Connecticut
- Sender: owner-wri-mathgroup at wolfram.com
I have the following output that I want to plot as an x,y,z surface
plot in Mathematica 3.0. This seems like it should be simple, but I am
having a hard time figuring it out. Does anyone have a solution?
Thanks,
Manuel Morales
In[121]:=
output=Transpose[{x,y,results}]
Out[121]=
{{-2,-2,0.134047},{-2,-1,0.874098},{-2,0,1.63303},{-2,1,0.874098},{-2,2,
0.134047},{-1,-2,0.874098},{-1,-1,5.69983},{-1,0,10.6487},{-1,1,
5.69983},{-1,2,0.874098},{0,-2,1.63303},{0,-1,10.6487},{0,0,19.8944},{0,1,
10.6487},{0,2,1.63303},{1,-2,0.874098},{1,-1,5.69983},{1,0,10.6487},{1,1,
5.69983},{1,2,0.874098},{2,-2,0.134047},{2,-1,0.874098},{2,0,1.63303},{2,
1,0.874098},{2,2,0.134047}}