Re: NewBie question Plot Table of points from a data file
- To: mathgroup at smc.vnet.net
- Subject: [mg53299] Re: [mg53270] NewBie question Plot Table of points from a data file
- From: Bob Hanlon <hanlonr at cox.net>
- Date: Wed, 5 Jan 2005 01:21:13 -0500 (EST)
- Reply-to: hanlonr at cox.net
- Sender: owner-wri-mathgroup at wolfram.com
pts=Table[{5Random[],3Random[],4Random[]},{5}]
pts[[2]]
pts[[2,3]]
pts[[1,1]]+pts[[2,1]]
Needs["Graphics`Graphics3D`"];
Needs["Graphics`Colors`"];
ScatterPlot3D[pts,
PlotStyle->{Red,AbsolutePointSize[5]}];
Show[Graphics3D[{
Blue,Line[{{1,1,0}#,#}]& /@ pts,
Red,AbsolutePointSize[5],Point /@ pts}],
Axes->True];
Show[Graphics3D[{
Blue,Line[{{0,0,0},#}]& /@ pts,
Red,AbsolutePointSize[5],Point /@ pts}],
Axes->True];
Bob Hanlon
>
> From: jfj <jf.jouvet at opales.fr>
To: mathgroup at smc.vnet.net
> Date: 2005/01/04 Tue AM 03:12:35 EST
> To: mathgroup at smc.vnet.net
> Subject: [mg53299] [mg53270] NewBie question Plot Table of points from a data file
>
> Hello,
> I want to plot a file of data (x, y, z coordinate on each line of an
> ascii file)
> I can read values with:
> pts = ReadList["myfile.dat", Table[Number, {3}]]
> but How display it
> Show[Graphics3D[pts]] give me error
> How access to my Table pts?
> How compute for instance pts[1,1] + pts[2,1] ?
> Thanks in advance for your help
>
>