In-class activity 14

#Three-Pointers Made: 
three_made<-c(4, 5, 3, 6, 7) 
#Three-Pointers Attempted: 
three_attempted<-c(9, 10, 8, 11, 12)
avg_game<-round(three_made/three_attempted,3)
avg_game

[1] 0.444 0.500 0.375 0.545 0.583

overall_avg<-round(mean(avg_game),2)
overall_avg

[1] 0.49

avg_total<-round(sum(three_made)/sum(three_attempted),3)
avg_total

[1] 0.5

Consider the following vectors representing the number of three-pointers made and attempted by a basketball player in five games: Three-Pointers Made: c(4, 5, 3, 6, 7) Three-Pointers Attempted: c(9, 10, 8, 11, 12) Calculate the three-point shooting percentage for each game and select the correct average three-point shooting percentage for the five games.

The three-point shooting percentages for the five games are 44.4%, 50.0%, 37.5%, 54.5%, and 58.3%. The average three-point shooting percentage across the five games is 49% (0.49).