Question 5

Consider the following vectors representing the number of field goals made and attempted by a basketball player in five games:

Field Goals Made: c(18, 7, 6, 9, 10,13) Field Goals Attempted: c(36, 23, 12, 18, 24,22)

Calculate the field goal percentage for each game and select the correct average field goal percentage for the five games.

#  vectors
made <- c(18, 7, 6, 9, 10, 13)
attempted <- c(36, 23, 12, 18, 24, 22)

#Field goal percentage for each game
fg_pct <- (made / attempted) * 100
fg_pct

[1] 50.00000 30.43478 50.00000 50.00000 41.66667 59.09091

#Average field goal percentage across games
avg_fg_pct <- mean(fg_pct)
avg_fg_pct

[1] 46.86539

#Average Field Goal Percentage = 46.86%