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