RE: help with simple data transform
- To: mathgroup at smc.vnet.net
- Subject: [mg37743] RE: [mg37734] help with simple data transform
- From: "David Park" <djmp at earthlink.net>
- Date: Mon, 11 Nov 2002 05:09:57 -0500 (EST)
- Sender: owner-wri-mathgroup at wolfram.com
Terrell,
If you start with
data = {{n, n, n, n}, {n, n, n, n, n, n}, {n, n, n, n, n}, {n, n}};
Map the following pure function onto the data items
{First[#], Rest[#]} & /@ data
{{n, {n, n, n}}, {n, {n, n, n, n, n}}, {n, {n, n, n, n}}, {n, {n}}}
/@ is the shortcut for Map and everything through & is the pure function.
David Park
djmp at earthlink.net
http://home.earthlink.net/~djmp/
From: Terrell Mitchell [mailto:usenet at twocedars.mailshell.com]
To: mathgroup at smc.vnet.net
I am trying to help a friend at a University create some plots of his
data. I have a trial version of Mathematica and it looks like it will
do the job, but I need help with a simple problem.
I have written some code to massage the data and put it in forms for
reading into Mathematica.
I will be doing a surface plot and want to provide can provide my own
triangulation data.
I will have data of the form
n n n n
n n n n n n
n n n n n
n n
I can read this into lists and end up with
{n,n,n,n},{n,n,n,n,n,n},{n,n,n,n,n},{n,n}
I need to turn this into
{n,{n,n,n}},{n,{n,n,n,n,n}},{n,{n,n,n,n}},{n,{n}}
to use as the triangulation data.
Can some kind soul provide me with some Mathematica code to transfrom my
data into the proper format. There are so many features, there must be
some simple transformation code.
Thank you in advance.
--
Terrell Mitchell
E-mail: usenet at privatetwocedars.mailshell.com
remove "private" for sending email