exam2

Question 5

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

# Field goals made
FGM <- c(18, 7, 6, 9, 10, 13)

# Field goals attempted
FGA <- c(36, 23, 12, 18, 24, 22)

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

# Calculate FG%
FG_Percentage <- (FGM/FGA) * 100

# Display percentages
FG_Percentage

[1] 50.00000 30.43478 50.00000 50.00000 41.66667 59.09091

# Calculate average FG%
Average_FG <- mean(FG_Percentage)

round(Average_FG, 2)

[1] 46.87