goals <- c(2, 3, 1, 4,2,0,1,4,3,2) 
goals
##  [1] 2 3 1 4 2 0 1 4 3 2

A.What is the total number of goals scored?

sum(goals)
## [1] 22

B.What is the average number of goals scored per game?

mean(goals)
## [1] 2.2

C.What is the maximum number number of goals scored in a single game?

max(goals)
## [1] 4

D.What is the minimum number of goals scored in a single game?

min(goals)
## [1] 0