Final Exam Questions

Question 5 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.

Field_Goals_Made<-c(18,7,6,9,10,13)
Field_Goals_Attempted<-c(36,23,12,18,24,22)
percentage_per_game<-(Field_Goals_Made/Field_Goals_Attempted)*100
percentage_per_game

[1] 50.00000 30.43478 50.00000 50.00000 41.66667 59.09091

# Calculate the average of the Field Goal Percentage
percentage_per_game <- mean(percentage_per_game)
percentage_per_game

[1] 46.86539

Question 6 Three_Pointers_Made<-c(3,5,0,6,3,7) Three_Pointers_Attempted<-c(9,10,8,12,11,12)

Calculate the three-point shooting percentage for each game and select the correct average three-point shooting percentage for the five games.

Three_Pointers_Made<-c(3,5,0,6,3,7)
Three_Pointers_Attempted<-c(9,10,8,12,11,12)
percentage_per_game<-(Three_Pointers_Made/Three_Pointers_Attempted)*100
percentage_per_game

[1] 33.33333 50.00000  0.00000 50.00000 27.27273 58.33333

# Calculate the average of the Three Point Shooting Percentage
percentage_per_game <- mean(percentage_per_game)
percentage_per_game

[1] 36.4899