Re: printing symbols at as a table
- To: mathgroup at smc.vnet.net
- Subject: [mg95254] Re: [mg95218] printing symbols at as a table
- From: Murray Eisenberg <murray at math.umass.edu>
- Date: Mon, 12 Jan 2009 06:26:22 -0500 (EST)
- Organization: Mathematics & Statistics, Univ. of Mass./Amherst
- References: <200901111136.GAA12266@smc.vnet.net>
- Reply-to: murray at math.umass.edu
Perhaps something like this to set up things:
varNames = {"r", "g", "s", "somethingElse"};
vars = ToExpression /@ varNames;
Next, calculate the values; here I just assign them:
vars = {20, 2.34, m^2 + D, "Hello, world!"};
Finally, create your table. Here are two ways, the second with an
embellishment:
Transpose[{varNames, vars}] // TableForm
Grid[Transpose[{varNames, vars}], Frame -> All]
If you prefer to start with the symbols for the variables instead of the
names, then just reverse, essentially, the first two lines of code:
Clear[r, g, s, somethingElse]
vars = {r, g, s, somethingElse};
varNames = ToString /@ vars;
Magician wrote:
> HiI have done a long calculation. But now I want to print some
> variables and their values. eg:
>
> r 20
> g 2.34
> s m^2 + D
>
> and so on ....
> as a summary. The In /Out makes me crazy. I want to create a table of
> all values. with the symbol on the left ath value on the right. some
> are numeric ei i have assigned a r. Now i want to get the symbol
> 'r'. I hope i am not confusing here.
>
--
Murray Eisenberg murray at math.umass.edu
Mathematics & Statistics Dept.
Lederle Graduate Research Tower phone 413 549-1020 (H)
University of Massachusetts 413 545-2859 (W)
710 North Pleasant Street fax 413 545-1801
Amherst, MA 01003-9305