goals <- c(2, 3, 1, 4,2,0,1,4,3,2)
# What is the total number of goals?

sum(goals)
## [1] 22
# What is the average number of goals scored per game?

mean(goals)
## [1] 2.2
# What is the maximum number of goals scored in a single game?

max(goals)
## [1] 4
# What is the minimum number of goals scored in a single game?

min(goals)
## [1] 0