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