[R] R square from lm

[Liaw, Andy]

Something like:

> x = runif(10)
> y = rnorm(x)
> fm = lm(y~x)
> summary(fm)[c("r.squared", "adj.r.squared")]
$r.squared
[1] 0.03385419

$adj.r.squared
[1] -0.08691404

[They are computed by summary.lm(), not lm().]

HTH,
Andy

> From: John Sorkin
> 
> I would like to get R2 (and and adjusted R2)  from an lm. I know I can
> compute R2 (SSreg/SStotal), but it would be nice to know if I 
> could get
> if automatically, e.g.
> fit1<-lm(y~x)
> Rsq<-fit1$rSquare.
> 
> R2.1.0 Patched under Windows 2000
> 
> Thanks,
> John
> 
> John Sorkin M.D., Ph.D.
> Chief, Biostatistics and Informatics
> Baltimore VA Medical Center GRECC and
> University of Maryland School of Medicine Claude Pepper OAIC
> 
> University of Maryland School of Medicine
> Division of Gerontology
> Baltimore VA Medical Center
> 10 North Greene Street
> GRECC (BT/18/GR)
> Baltimore, MD 21201-1524
> 
> 410-605-7119 
> -- NOTE NEW EMAIL ADDRESS:
> jsorkin at grecc.umaryland.edu
> 
> ______________________________________________
> R-help at stat.math.ethz.ch mailing list
> https://stat.ethz.ch/mailman/listinfo/r-help
> PLEASE do read the posting guide! 
> http://www.R-project.org/posting-guide.html
> 
> 
>