Exemplo de regressão linear

Abaixo um exemplo de definição de dados e regressão.

x<-c(1,3,4,5,8,12,5,7)
y<-c(10,14,17,20,25,30,18,19)

Abaixo vai o gráfico de dispersão.

plot(x,y)

Estimando a regressão e mostrando resultados

reg1<-lm(y~x)
summary(reg1)
## 
## Call:
## lm(formula = y ~ x)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -2.5759 -0.5865 -0.2285  0.9890  1.9890 
## 
## Coefficients:
##             Estimate Std. Error t value Pr(>|t|)    
## (Intercept)   9.0986     1.1450   7.946 0.000211 ***
## x             1.7825     0.1775  10.043 5.65e-05 ***
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 1.586 on 6 degrees of freedom
## Multiple R-squared:  0.9439, Adjusted R-squared:  0.9345 
## F-statistic: 100.9 on 1 and 6 DF,  p-value: 5.651e-05
plot(x,y)
abline(reg1)

E acabou….