Re: To put name to columns
- To: mathgroup at smc.vnet.net
- Subject: [mg116469] Re: To put name to columns
- From: Bill Rowe <readnews at sbcglobal.net>
- Date: Wed, 16 Feb 2011 04:36:34 -0500 (EST)
On 2/15/11 at 6:35 AM, cjandres at ono.com ("Carlos J. Andr=C3=A9s Blasco") wrote: >Please, how to put name to each column in a table with several >columns, when you insert a grid? The idea is to manipulate these >columns by means of their names, for example to find out the >average, standard devaition, etc Thank you Carlos J,. Andres I accomplish this by making the first row of a data array a list of symbols with no assigned values. I use the function below, to extract one or more columns from the data array Columns[data:{___List},n:{__Symbol}]:= data[[All,Flatten[Position[First[data],#]&/@n]]] So, say the first row of my data array was {a,b,c,d} and I wanted the mean for column a. I would do Mean@Rest@Columns[data, {a}] I actually have written a package of several commands that allow me to do a variety of useful things based on the scheme above. If you are interested in the package contact me offline and I will be happy to send it to you as is. I have thought about making this package available on Mathsource. But, I've never taken the time to write examples and documentation for the functions in the package. The only thing I've created is usage messages that describe what the functions do with syntax.