R Notebook

This is an R Markdown Notebook. When you execute code within the notebook, the results appear beneath the code.

Try executing this chunk by clicking the Run button within the chunk or by placing your cursor inside it and pressing Ctrl+Shift+Enter.

Exercise Activity 9: Budgeting for Players based on OBP and SLG

#Suppose you are the General Manager of a baseball team, and you are selecting two players for your team. You have a budget of $10,500,000, and you have the choice between the following players: #Player Name OBP SLG Salary #Yandy Diaz 0.403 0.511 $8,000,000 #Joey Meneses 0.320 0.366 $723,600 #Jose Abreu 0.292 0.358 $19,500,000 #Ryan Noda 0.384 0.400 $720,000 #Nate Lowe 0.365 0.426 $4,050,000

# create a data frame with the players and their stats
Data = data.frame(
  Player = c("Yandy Diaz", "Joey Meneses", "Jose Abreu", "Ryan Noda", "Nate Lowe"),
  OBP = c(0.403, 0.320, 0.292, 0.384, 0.365),
  SLG = c(0.511, 0.366, 0.358, 0.400, 0.426),
  Salary = c(8000000, 723600, 19500000, 720000, 4050000)
)

# calculate the expected runs for each player
Data$ExpectedRuns = -804.63 + 2737.77 * Data$OBP + 1584.91 * Data$SLG

Data$ExpectedRuns

Expected runs for each player:

Yandy Diaz: 1108.5803

Joey Meneses: 651.5335

Jose Abreu: 562.1966

Ryan Noda: 880.6377

Nate Lowe: 869.8277

# display the data frame
Data

Based on the expected runs, the best combination of players to select would be Yandy Diaz and Ryan Noda.

This combination would give the most expected runs and stay within budget of $10,500,000.

The total salary for Yandy Diaz and Ryan Noda is $8,720,000, which is within the budget.

The expected runs for this combination would be 1108.5803 + 880.6377 = 1989.2180.