TERCERA FORMA: utilizando funciones de R construidas para cierta tarea

#Funcion R para regresiones lm(y ~ X, data= ..., ...)

modelo1 <- lm(Puntaje ~ Votos, data = animacion)

# modelo1 <- lm(caso1$ingreso ~ caso1$educacion)
modelo1

## 
## Call:
## lm(formula = Puntaje ~ Votos, data = animacion)
## 
## Coefficients:
## (Intercept)        Votos  
##   7.802e+00    1.476e-06