CODEWITHSUNDEEP
r
soroush
soroush

Reputation: 13

How do I add a regression line equation to plot?

I am trying to add regression line equation, R square and P value to my plot, any thoughts on how I can do it?

Here is the code that I am using in R:

plot<- plot(Q,CALCIUM.DISSOLVED)
fit<-(lm(CALCIUM.DISSOLVED ~ Q))
abline (fit)

Upvotes: 1

Views: 2857

Answers (1)

Andryas Waurzenczak
Andryas Waurzenczak

Reputation: 469

Using the data set cars

m <- lm(dist ~ speed, data = cars)

plot(dist ~ speed,data = cars)

abline(m, col = "red")

Here we use summary() to extract the R-squared and P-value.

m1 <-  summary(m)

mtext(paste0("R squared: ",round(m1$r.squared,2)),adj = 0)

mtext(paste0("P-value: ", format.pval(pf(m1$fstatistic[1], # F-statistic
                                     m1$fstatistic[2], # df
                                     m1$fstatistic[3], # df
                                     lower.tail = FALSE))))

mtext(paste0("dist ~ ",round(m1$coefficients[1],2)," + ", 
                   round(m1$coefficients[2],2),"x"),
      adj = 1)

Upvotes: 3

Related Questions