Análisis

summary(data)
##   Municipio           Educacion          PIB       
##  Length:78          Min.   : 7.00   Min.   : 8232  
##  Class :character   1st Qu.:15.50   1st Qu.:11728  
##  Mode  :character   Median :22.75   Median :14065  
##                     Mean   :24.57   Mean   :14581  
##                     3rd Qu.:32.48   3rd Qu.:16334  
##                     Max.   :55.00   Max.   :24204
sd(data$Educacion)
## [1] 12.18042
sd(data$PIB)
## [1] 3560.664

Regresión lineal

lineal <-lm(PIB ~ Educacion ,data)
resumen <- summary(lineal)
resumen
## 
## Call:
## lm(formula = PIB ~ Educacion, data = data)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -6460.6 -2744.2  -656.2  1693.4  9618.8 
## 
## Coefficients:
##             Estimate Std. Error t value Pr(>|t|)    
## (Intercept) 14073.26     916.17  15.361   <2e-16 ***
## Educacion      20.64      33.45   0.617    0.539    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 3575 on 76 degrees of freedom
## Multiple R-squared:  0.004988,   Adjusted R-squared:  -0.008105 
## F-statistic: 0.381 on 1 and 76 DF,  p-value: 0.5389

Interpretación de resultados

Puesto que el coeficiente de relación R^2 es demasiado bajo (R^2= 0.005), no se puede concluir que hay una relación significativa entre los ingresos en Puerto Rico y la educación. Adicional, el p-valor es un valor mayor que el nivel de significancia alfa (p_valor> 0.05), por lo que no se puede rechazar la hipótesis nula.