當(dāng)有兩個(gè)及以上的X變量時(shí)，線性回歸不能用了，此時(shí)要做多重線性回歸。

上代碼

1. 給出數(shù)據(jù)

mouse.data<-data.frame(
   weight=c(1.8,0.9,2.4,3.5,3.9,4.4,5.1,5.6,6.3),
   size=c(1.4,2.6,1.0,3.7,5.5,3.2,3.0,4.9,6.3),
   tail=c(1.2,1.5,2.1,2.1,1,2,1.3,1.8,1.9))
##看一下
mouse.data

image.png

2. 看一下數(shù)據(jù)情況

plot(mouse.data)

image.png

3. 擬合多重線性回歸

multiple.regression<-lm(mouse.data$size~mouse.data$weight+mouse.data$tail)

4. 查看擬合指標(biāo)

summary(multiple.regression)

image.png