RE: plot graph
- To: mathgroup@smc.vnet.net
- Subject: [mg11087] RE: [mg11037] plot graph
- From: jmt <jmthomas@cybercable.tm.fr>
- Date: Sun, 22 Feb 1998 14:55:13 -0500
- Organization: TeA
Try this:
<<DiscreteMath`ComputationalGeometry`
data1={{1,10,100},{2,20,200},{3,30,300},{4,40,400}}
TriangularSurfacePlot[data1]
data2={{0,0,1},{1,0,-1},{1,1,1/2},{0,1,0}}
TriangularSurfacePlot[data2,ViewPoint->{0.014, -0.043, 3.383}]
Hope this helps,
----------------------------------------------- Jean-Marie THOMAS
Conseil et Audit en Ingenierie de Calcul www.cybercable.tm.fr/~jmthomas
------------------------------------------------
-----Message d'origine-----
De: Irene Cheung [SMTP:h9302431@hkusua.hku.hk] Date: jeudi 19 fevrier
1998 02:32
A: mathgroup@smc.vnet.net
Objet: [mg11037] plot graph
I have a set of solutions. I partitioned them 3 by 3 :
{{x1,y1,z1},{x2,y2,z2},{x3,y3,z3},{x4,y4,z4},...}. I want to plot a 3D
graph. I know ListPlot[] can treat {{x1,y1},{x2,y2},...}. But
ListPlot3D[] does not give the graph I want. What is wrong ? I am
using Mathematica 3.0 .
Give an example, I think
ListPlot3D[{{1,10,100},{2,20,200},{3,30,300},{4,40,400}}] should show a
straight line. But it doesn't.
Thanks for help.
David Chik. ( email : h9505865@hkusua.hku.hk )