Re: create a list with x,y,z coordinates
- To: mathgroup at smc.vnet.net
- Subject: [mg81636] Re: create a list with x,y,z coordinates
- From: "Dana DeLouis" <dana.del at gmail.com>
- Date: Sun, 30 Sep 2007 03:57:20 -0400 (EDT)
My two humble attempts try to eliminate numbers like 0.15000000000000002
from appearing in your table.
z = Partition[zVals, 10];
r = Range[0.05, 1, 0.1] // Rationalize // N
xy = Outer[List, r, r];
MapIndexed[Join[#1, {Extract[z, #2]}] &, xy, {2}]
(* or *)
Partition[Table[Join[Tuples[r, 2][[j]], {zVals[[j]]}], {j, 100}], 10]
(I like WCC's solution though)
--
Dana DeLouis
Windows XP & Mathematica 6
"Claus" <claus.haslauer at web.de> wrote in message
news:fdf2ol$2i7$1 at smc.vnet.net...
> Hi,
> I have a list of z-values:
>
> zVals={13, 8, 15, 9, 15, 8, 11, 2, 18, 8, 5, 10, 11, 10, 9, 14, 6, 23,
> 6, 14, 16, 5, 10, 5, 18, 10, 11, 10, 15, 8, 6, 23, 6, 17, 6, 12, 9, 17,
> 4, 8, 18, 4, 18, 9, 13, 9, 14, 6, 10, 6, 5, 13, 5, 10, 6, 19, 8, 17, 9,
> 16, 15, 5, 13, 5, 11, 9, 16, 2, 21, 11, 4, 15, 7, 10, 7, 16, 10, 14, 7,
> 18, 17, 8, 15, 11, 14, 5, 14, 4, 13, 6, 8, 16, 8, 22, 8, 6, 9, 13, 5, 12}
>
> These z-values are at grid points in a regularly spaced mesh, indices i
> and j correspond to coordinates x and y, respectively. I can create the
> mesh by
>
> Table[{i,j},{i,0.05,1,0.1},{j,0.05,1,0.1}]
>
> What is the best way in mathematica to "append" the z-values to the
> (x,y)values?
> I know that they are in order corresponding to the (x,y)values; that is
> 13 corresponds to (0.05,0.05) and 12 corresponds to (0.95,0.95).
>
> Thanks for your help,
> Claus
>