Re: [R] Insert regression coefficients in a graphic.

From: David Winsemius <dwinsemius_at_comcast.net>
Date: Fri, 22 Apr 2011 20:48:24 -0400

On Apr 22, 2011, at 2:16 PM, JJCV wrote:

> Hello.
>
> I did a graphic with the next code:
>
> T=c(10,15,20,25,30)
> p=c(1003,1005,1010,1011,1014)
> plot(T, p, xlab=" ",, ylab=" ", pch=1, cex=2, lwd=2,
> xlim=c(5,30), ylim=c(1000,1015))
> abline(lm(p ~ T), lwd=2)
> lm(p ~ T)
>
> I want to see the regression coefficient in the graphic. ┐How can I
> do that?

 > coef(lm(p ~ T)
+ )

(Intercept)           T
      997.40        0.56

 > text(10,1010, labels=paste("Slope =", coef(lm(p ~ T) )[2]) )

I suppose you could format it with formatC() or sprintf() if you wanted it to fewer than 10 decimal places.

-- 
David Winsemius, MD
West Hartford, CT

______________________________________________
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.
Received on Sat 23 Apr 2011 - 00:50:10 GMT

Archive maintained by Robert King, hosted by the discipline of statistics at the University of Newcastle, Australia.
Archive generated by hypermail 2.2.0, at Sat 23 Apr 2011 - 20:50:32 GMT.

Mailing list information is available at https://stat.ethz.ch/mailman/listinfo/r-help. Please read the posting guide before posting to the list.

list of date sections of archive