Chapter 1 Modelo de regresión para predecir el puntaje tomando como predictor

# la cantdiad de votos

modelo1<-lm(Puntaje ~ Votos,data=animacion )
modelo1
## 
## Call:
## lm(formula = Puntaje ~ Votos, data = animacion)
## 
## Coefficients:
## (Intercept)        Votos  
##   7.802e+00    1.476e-06
summary(modelo1)
## 
## Call:
## lm(formula = Puntaje ~ Votos, data = animacion)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -4.6022 -0.5910  0.3158  0.6757  1.8835 
## 
## Coefficients:
##              Estimate Std. Error t value Pr(>|t|)    
## (Intercept) 7.802e+00  2.018e-01  38.664   <2e-16 ***
## Votos       1.476e-06  7.924e-07   1.863    0.069 .  
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 1.069 on 45 degrees of freedom
## Multiple R-squared:  0.07162,    Adjusted R-squared:  0.05099 
## F-statistic: 3.472 on 1 and 45 DF,  p-value: 0.06896
# Modelo de regresión múltiple

modelo2<-lm(Puntaje ~ Votos + Género,data=animacion )
modelo2
## 
## Call:
## lm(formula = Puntaje ~ Votos + Género, data = animacion)
## 
## Coefficients:
##                        (Intercept)                               Votos  
##                          8.076e+00                           4.056e-06  
##    GéneroAnimation, Action, Comedy  GéneroAnimation, Adventure, Comedy  
##                          2.407e-01                          -1.469e+00  
##  GéneroAnimation, Adventure, Drama             GéneroAnimation, Comedy  
##                         -3.844e+00                          -9.091e-01  
##     GéneroAnimation, Comedy, Drama     GéneroAnimation, Comedy, Family  
##                          9.116e-02                          -2.769e+00  
##   GéneroAnimation, Comedy, Romance      GéneroAnimation, Drama, Family  
##                         -4.975e-01                          -7.802e-02  
##            GéneroAnimation, Family    GéneroAnimation, Family, Fantasy  
##                          1.583e+00                          -1.551e+00  
##     GéneroAnimation, Short, Action   GéneroAnimation, Short, Adventure  
##                         -4.854e-02                          -1.281e+00
summary(modelo2)
## 
## Call:
## lm(formula = Puntaje ~ Votos + Género, data = animacion)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -2.1084 -0.2701  0.0000  0.2020  1.2910 
## 
## Coefficients:
##                                      Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                         8.076e+00  1.849e-01  43.680  < 2e-16 ***
## Votos                               4.056e-06  7.991e-07   5.076 1.47e-05 ***
## GéneroAnimation, Action, Comedy     2.407e-01  4.296e-01   0.560  0.57898    
## GéneroAnimation, Adventure, Comedy -1.469e+00  2.870e-01  -5.119 1.30e-05 ***
## GéneroAnimation, Adventure, Drama  -3.844e+00  1.036e+00  -3.710  0.00076 ***
## GéneroAnimation, Comedy            -9.091e-01  3.719e-01  -2.444  0.02002 *  
## GéneroAnimation, Comedy, Drama      9.116e-02  7.060e-01   0.129  0.89804    
## GéneroAnimation, Comedy, Family    -2.769e+00  4.294e-01  -6.448 2.60e-07 ***
## GéneroAnimation, Comedy, Romance   -4.975e-01  7.049e-01  -0.706  0.48524    
## GéneroAnimation, Drama, Family     -7.802e-02  7.092e-01  -0.110  0.91307    
## GéneroAnimation, Family             1.583e+00  7.084e-01   2.235  0.03230 *  
## GéneroAnimation, Family, Fantasy   -1.551e+00  7.297e-01  -2.126  0.04109 *  
## GéneroAnimation, Short, Action     -4.854e-02  5.120e-01  -0.095  0.92503    
## GéneroAnimation, Short, Adventure  -1.281e+00  7.092e-01  -1.806  0.08004 .  
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 0.6848 on 33 degrees of freedom
## Multiple R-squared:  0.7204, Adjusted R-squared:  0.6103 
## F-statistic: 6.542 on 13 and 33 DF,  p-value: 6.269e-06
modelo3<-lm(Puntaje ~ Votos + Género + Duracion,data=animacion )
modelo3
## 
## Call:
## lm(formula = Puntaje ~ Votos + Género + Duracion, data = animacion)
## 
## Coefficients:
##                        (Intercept)                               Votos  
##                          8.774e+00                           2.413e-06  
##    GéneroAnimation, Action, Comedy  GéneroAnimation, Adventure, Comedy  
##                          3.188e-02                          -4.272e-01  
##  GéneroAnimation, Adventure, Drama             GéneroAnimation, Comedy  
##                         -2.814e+00                          -6.721e-01  
##     GéneroAnimation, Comedy, Drama     GéneroAnimation, Comedy, Family  
##                         -3.510e-01                          -5.393e-01  
##   GéneroAnimation, Comedy, Romance      GéneroAnimation, Drama, Family  
##                         -1.066e+00                          -7.757e-01  
##            GéneroAnimation, Family    GéneroAnimation, Family, Fantasy  
##                          9.013e-01                          -1.693e+00  
##     GéneroAnimation, Short, Action   GéneroAnimation, Short, Adventure  
##                         -5.961e-01                          -1.977e+00  
##                    Duracion100 min                     Duracion102 min  
##                         -1.637e+00                          -1.562e+00  
##                    Duracion105 min                     Duracion106 min  
##                         -1.548e+00                          -2.053e+00  
##                    Duracion107 min                     Duracion108 min  
##                         -1.731e+00                          -1.547e+00  
##                    Duracion110 min                     Duracion115 min  
##                         -1.111e+00                          -1.890e+00  
##                    Duracion117 min                      Duracion15 min  
##                                 NA                                  NA  
##                     Duracion20 min                      Duracion22 min  
##                         -1.202e+00                          -5.008e-01  
##                     Duracion23 min                      Duracion24 min  
##                         -3.386e-01                          -3.119e-01  
##                     Duracion25 min                      Duracion26 min  
##                                 NA                          -5.310e-01  
##                     Duracion30 min                      Duracion41 min  
##                                 NA                          -2.644e-01  
##                     Duracion50 min                       Duracion7 min  
##                         -4.013e-01                                  NA  
##                     Duracion73 min                      Duracion76 min  
##                         -5.036e+00                                  NA  
##                     Duracion87 min                      Duracion88 min  
##                         -1.894e+00                                  NA
summary(modelo3)
## 
## Call:
## lm(formula = Puntaje ~ Votos + Género + Duracion, data = animacion)
## 
## Residuals:
##      Min       1Q   Median       3Q      Max 
## -0.51085 -0.03985  0.00000  0.01448  0.91781 
## 
## Coefficients: (7 not defined because of singularities)
##                                      Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                         8.774e+00  3.780e-01  23.212 9.52e-14 ***
## Votos                               2.413e-06  6.197e-07   3.894  0.00129 ** 
## GéneroAnimation, Action, Comedy     3.188e-02  2.730e-01   0.117  0.90849    
## GéneroAnimation, Adventure, Comedy -4.272e-01  3.122e-01  -1.368  0.19020    
## GéneroAnimation, Adventure, Drama  -2.814e+00  8.381e-01  -3.358  0.00400 ** 
## GéneroAnimation, Comedy            -6.721e-01  3.977e-01  -1.690  0.11036    
## GéneroAnimation, Comedy, Drama     -3.510e-01  5.421e-01  -0.648  0.52646    
## GéneroAnimation, Comedy, Family    -5.393e-01  6.083e-01  -0.887  0.38843    
## GéneroAnimation, Comedy, Romance   -1.066e+00  5.362e-01  -1.988  0.06425 .  
## GéneroAnimation, Drama, Family     -7.757e-01  5.345e-01  -1.451  0.16607    
## GéneroAnimation, Family             9.013e-01  5.345e-01   1.686  0.11114    
## GéneroAnimation, Family, Fantasy   -1.693e+00  5.720e-01  -2.959  0.00923 ** 
## GéneroAnimation, Short, Action     -5.961e-01  4.656e-01  -1.280  0.21870    
## GéneroAnimation, Short, Adventure  -1.977e+00  5.345e-01  -3.699  0.00195 ** 
## Duracion100 min                    -1.637e+00  6.157e-01  -2.659  0.01714 *  
## Duracion102 min                    -1.562e+00  8.306e-01  -1.880  0.07838 .  
## Duracion105 min                    -1.548e+00  4.757e-01  -3.253  0.00499 ** 
## Duracion106 min                    -2.053e+00  6.201e-01  -3.311  0.00441 ** 
## Duracion107 min                    -1.731e+00  6.046e-01  -2.862  0.01129 *  
## Duracion108 min                    -1.547e+00  6.272e-01  -2.467  0.02531 *  
## Duracion110 min                    -1.111e+00  6.123e-01  -1.815  0.08835 .  
## Duracion115 min                    -1.890e+00  5.345e-01  -3.535  0.00275 ** 
## Duracion117 min                            NA         NA      NA       NA    
## Duracion15 min                             NA         NA      NA       NA    
## Duracion20 min                     -1.202e+00  5.345e-01  -2.250  0.03890 *  
## Duracion22 min                     -5.008e-01  5.155e-01  -0.972  0.34571    
## Duracion23 min                     -3.386e-01  4.447e-01  -0.761  0.45752    
## Duracion24 min                     -3.119e-01  4.066e-01  -0.767  0.45409    
## Duracion25 min                             NA         NA      NA       NA    
## Duracion26 min                     -5.310e-01  5.346e-01  -0.993  0.33533    
## Duracion30 min                             NA         NA      NA       NA    
## Duracion41 min                     -2.644e-01  5.477e-01  -0.483  0.63585    
## Duracion50 min                     -4.013e-01  5.401e-01  -0.743  0.46822    
## Duracion7 min                              NA         NA      NA       NA    
## Duracion73 min                     -5.036e+00  8.092e-01  -6.223 1.22e-05 ***
## Duracion76 min                             NA         NA      NA       NA    
## Duracion87 min                     -1.894e+00  6.131e-01  -3.090  0.00703 ** 
## Duracion88 min                             NA         NA      NA       NA    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 0.378 on 16 degrees of freedom
## Multiple R-squared:  0.9587, Adjusted R-squared:  0.8813 
## F-statistic: 12.38 on 30 and 16 DF,  p-value: 1.604e-06