Assignment 8

ExpectedRuns=-804.63+2737.77*(0.361)+1584.91*(0.409)
ExpectedRuns

[1] 831.9332

We expect the team to score around 832 runs.

library(car)

vif(RunsReg)

     OBP      SLG 
2.856197 2.856197 

RunsAllowedReg= 1m(RA~OOBP+OSLG, data=moneyball)
summary(RunsAllowedReg )

vif(RunsAllowedReg)

    OOBP     OSLG 
2.735629 2.735629 

ExpectedRunsAllowed=-837.38+2913.60*(0.267)+1514.29*(0.392)
ExpectedRunsAllowed

[1] 534.1529

The team is expected to allow around 534 runs

vif(RunsAllowedReg)

    OOBP     OSLG 
2.735629 2.735629