獲得迴歸係數R

我已經使用下面的腳本繪製了下面的散點圖，但仍需要獲得迴歸係數。獲得迴歸係數R

任何幫助將非常感激。

lm.irt12 <- lm(prtemp ~ irt12,data=apirt) 
summary(lm.irt12) 
plot(apirt$irt12[apirt$surv==1], 
    apirt$prtemp[apirt$surv==1], 
    xlab="ave. base of ears (°C)", 
    ylab="rectal (°C)", 
    xlim=c(26,42), 
    ylim=c(30,42), 
    col='blue') 
points(apirt$irt12[apirt$surv==0], apirt$prtemp[apirt$surv==0],col='red') 
abline(lm.irt12) 
abline(h=36,v=0, col="gray10",lty=20) 
#col = "gray60" OR col = "lightgray", lty=3; #(lty=3: broken line, 1:continuous) 
text(26.7,36.7,parse(text='36*degree'),col='gray10') 
abline(h=34,v=0, col="gray10",lty=20) 
#col = "gray60" OR col = "lightgray", lty=3; #(lty=3: broken line, 1:continuous) 
text(26.7,34.7,parse(text='34.0*degree'),col='gray10')

enter image description here

來源

2014-10-03 baz

你的第二行代碼應該返回係數。另外，'coef（lm.irt12）'。 – jbaums 2014-10-03 08:36:42

@jbaums：非常感謝您的幫助！你是對的，總結（lm.irt12）給了我相同的係數。 – baz 2014-10-03 15:41:10

你必須讓你的線性模型對象lm.irt12的coefficient參數：

lm.irt12$coefficients

要查看[R對象的參數，你可以這樣做：

str(lm.irt12)

來源

2014-10-03 08:38:40 Pop

獲得迴歸係數R

回答

相關問題