[R] formatting a result table (number of digits)

[David Winsemius]

On Apr 8, 2010, at 6:20 PM, Esmail wrote:

> Hello,
>
> Is there an easy way to format the output of a result table that R
> generates from a regression?  I like the table, but would like to
> limit the number of decimal points in the entries if possible.
>
> For instance I would like only 3 digits of precision for the Value,
> Std.Error. (And if it would be easy to get rid of scientific notation,
> that would be good to know too). So ideally keep the table/headers  
> etc,
> but chance the entries.
>
> I've looked at format and print without much success.
> I'm using  R 2.10.1 in a Linux environment.
>
> Thanks,
> Esmail
>
>
> Below's an example of generating the table I am trying to format:

Well, that's not a reproducible example. At any rate, use print with  
the digits argument:

 > require(nlme)
Loading required package: nlme
 > ?lme
 > fm1 <- lme(distance ~ age, data = Orthodont) # random is ~ age
 > s <- summary(fm1)
 > s$tTable
                  Value  Std.Error DF   t-value      p-value
(Intercept) 16.7611111 0.77524609 80 21.620375 3.737321e-35
age          0.6601852 0.07125325 80  9.265334 2.645937e-14

 > print(s$tTable, digits=3)
             Value Std.Error DF t-value  p-value
(Intercept) 16.76    0.7752 80   21.62 3.74e-35
age          0.66    0.0713 80    9.27 2.65e-14

Y'er not going to be able to get rid of the scientific notation when  
the p-values are in the range of e-14.

-- 
David.

>
> > load('data.rda')
> > library(nlme)
> > ic <- lme(Ind_Cntrbn ~ D_Clb_Pbl+D_Club+Round 
> + 
> Ind_cntr_1 
> +GR_cntr_1+D_Success_1+IndEarngs_1+D_Unfair_cntr_1+D_1st10rnds 
> +D_Female+D_econ_gov+D_mjr_social+D_frshmn+D_junior+D_senior 
> +UrbanArea+ParentEducation+Empathy+Lcs_Cntrl_Intn+Trust, random=~1| 
> Group, data=Dataset)
> > s=summary(ic)
> > t=s$tTable
> > t
>                       Value  Std.Error   DF     t-value      p-value
> (Intercept)      5.683020304 0.78867419 2237  7.20578963 7.853134e-13
> D_Clb_Pbl        0.193187682 0.25494452   22  0.75776363 4.566332e-01
> D_Club           0.112745107 0.09636280 2237  1.17000650 2.421230e-01
> Round           -0.096400805 0.01812222 2237 -5.31948107 1.144272e-07
> Ind_cntr_1       0.340706093 0.04002901 2237  8.51147920 3.097981e-17
> GR_cntr_1        0.033215293 0.01271829 2237  2.61161545 9.071799e-03
> D_Success_1      2.210964800 0.38904872 2237  5.68300241 1.496038e-08
> IndEarngs_1     -0.277758214 0.03903289 2237 -7.11600506 1.489839e-12
> D_Unfair_cntr_1 -0.535979858 0.18280685 2237 -2.93194624 3.402644e-03
> D_1st10rnds     -0.479775417 0.19375663 2237 -2.47617547 1.335331e-02
> D_Female         0.076666269 0.12354518 2237  0.62055250 5.349573e-01
> D_econ_gov      -0.282679230 0.12023002 2237 -2.35115350 1.880165e-02
> D_mjr_social     0.149134543 0.12572505 2237  1.18619595 2.356709e-01
> D_frshmn        -0.149157208 0.20609463 2237 -0.72373166 4.693062e-01
> D_junior        -0.112917886 0.17455488 2237 -0.64689045 5.177692e-01
> D_senior        -0.107570461 0.15088326 2237 -0.71293835 4.759583e-01
> UrbanArea       -0.364410559 0.11988827 2237 -3.03958489 2.396486e-03
> ParentEducation  0.098237171 0.05350248 2237  1.83612365 6.647201e-02
> Empathy          0.042232476 0.08248236 2237  0.51201825 6.086888e-01
> Lcs_Cntrl_Intn   0.132131306 0.08841098 2237  1.49451240 1.351828e-01
> Trust           -0.003872427 0.08468412 2237 -0.04572789 9.635312e-01
>
> ______________________________________________
> R-help at r-project.org mailing list
> https://stat.ethz.ch/mailman/listinfo/r-help
> PLEASE do read the posting guide http://www.R-project.org/posting-guide.html
> and provide commented, minimal, self-contained, reproducible code.

David Winsemius, MD
West Hartford, CT