Re: formatting table with integers and floats in a column
- To: mathgroup at smc.vnet.net
- Subject: [mg61377] Re: [mg61356] formatting table with integers and floats in a column
- From: Murray Eisenberg <murray at math.umass.edu>
- Date: Mon, 17 Oct 2005 02:29:45 -0400 (EDT)
- Organization: Mathematics & Statistics, Univ. of Mass./Amherst
- References: <20051016121525.UUOK13165.eastrmmtao01.cox.net@[172.18.52.8]>
- Reply-to: murray at math.umass.edu
- Sender: owner-wri-mathgroup at wolfram.com
Yes, terrific. Now, if I want the FontFamily to be "Times", there's
still trouble!
Bob Hanlon wrote:
> This does it by brute force.
>
> statNames={"N","Max","Min","Mean","Std.dev.","Median"};
>
> statNumbers={40,103,2,56.8,22.5,59};
>
> StyleForm[
> TableForm[
> Transpose[{statNames,
> If[IntegerQ[#],
> StringReplace[
> ToString[
> NumberForm[#,{4,1},
> NumberPadding->{" ","0"}]],
> ".0"->" "],
> NumberForm[#,{4,1},
> NumberPadding->{" ","0"}]]&/@
> statNumbers}]],
> FontFamily->"Courier"]
>
>
> Bob Hanlon
>
>
>>From: Murray Eisenberg <murray at math.umass.edu>
To: mathgroup at smc.vnet.net
>>Date: 2005/10/16 Sun AM 12:18:11 EDT
>>Subject: [mg61377] [mg61356] formatting table with integers and floats in a column
>>
>>I have a 2-column table whose first column consists of strings --
>>
>> statNames = {"N", "Max", "Min", "Mean", "Std.dev.", "Median"};
>>
>>-- and a column of corresponding numbers:
>>
>> statNumbers = {40, 103, 2, 56.8, 22.5, 59};
>>
>>If I use
>>
>> TableForm[Transpose[{statNames, statNumbers}]]
>>
>>then of course all the numbers will be left-aligned on their leftmost
>>digits.
>>
>>I want to format the numbers in the table so that they will appear as
>>follows:
>>
>>N 40
>>Max 103
>>Min 2
>>Mean 56.8
>>Std.dev. 22.5
>>Median 59
>>
>>Notice that I want the integers to appear as integers -- WITHOUT any
>>trailing decimal point; but the alignment is to be as if the numbers
>>were aligned on the decimal points including the implicit, but
>>unprinted, decimal points in the integers.
>>
>>How??
>>
>>I've tried various things with mapping NumberForm onto the individual
>>numbers but cannot quite get the correct effect.
>>
>>--
>>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
>>
>>
>
>
>
--
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