RE: Simple 3D plot of two points
- To: mathgroup at smc.vnet.net
- Subject: [mg41538] RE: [mg41517] Simple 3D plot of two points
- From: "David Park" <djmp at earthlink.net>
- Date: Mon, 26 May 2003 05:46:18 -0400 (EDT)
- Sender: owner-wri-mathgroup at wolfram.com
Jong,
Needs["Graphics`Colors`"]
pta = {1, 0, 2};
ptb = {10, 3, 3};
Show[Graphics3D[
{Red, AbsolutePointSize[6],
Point /@ {pta, ptb}}],
Axes -> True,
BoxRatios -> {1, 1, 1}];
David Park
djmp at earthlink.net
http://home.earthlink.net/~djmp/
From: Jong Choi [mailto:jxc91 at po.cwru.edu]
To: mathgroup at smc.vnet.net
Dear All,
This is a simple problem but I don't know what function does it.
I want to plot 2 points in the 3d space
a={{1,0,2}};
b={{10,3,3}};
Please let me know ASAP.
Thanks,
Jong