Re: NewBie question Plot Table of points from a data file

• To: mathgroup at smc.vnet.net
• Subject: [mg53316] Re: [mg53270] NewBie question Plot Table of points from a data file
• From: "David Annetts" <davidannetts at ihug.com.au>
• Date: Wed, 5 Jan 2005 01:21:55 -0500 (EST)
• Sender: owner-wri-mathgroup at wolfram.com

```
Hi jfj,

> 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
> my Table pts?

The following should get you started ...

pts = Table[{i, j, Random[Real, {-5, 5}]}, {i, 10}, {j, 10}];
pts = Partition[Flatten[pts], 3]
Show[Graphics3D[Point[#] & /@ pts],
Axes -> True];

> How compute for instance pts[1,1] + pts[2,1] ?

Your syntax is wrong for starters, so it's difficult to know what you're
after.

In[26]:=
pts//Short
pts[[1, 1]]
pts[[2, 1]]
pts[[1, 1]] + pts[[2, 1]]

Out[26]//Short=
{{1,1,3.30002},{1,2,-0.172164},\[LeftSkeleton]97\[RightSkeleton],{10,10,1.\
63075}}

Out[27]=
1

Out[28]=
1

Out[29]=
2

Which might not be what you expected.

I guess what you're after is the height, or last element of each point, in
which case
In[50]:=
Last@pts[[1]]
Last@pts[[2]]
Plus[
Last@pts[[1]],
Last@pts[[2]]]

Out[50]=
3.30002

Out[51]=
-0.172164

Out[52]=
3.12785

works.

For 5.0.1, Section 2.4.2 tells you all about parts of lists.

Regards,

Dave.

--
No virus found in this outgoing message.
Checked by AVG Anti-Virus.
Version: 7.0.300 / Virus Database: 265.6.8 - Release Date: 3/01/2005

```

• Prev by Date: Re: How to draw a trajectory in DensityPlot&#65311;
• Next by Date: Re: Re: How to draw a trajectory in DensityPlot&#65311;
• Previous by thread: Re: NewBie question Plot Table of points from a data file