Exam 1 - Question 16

#Given vector representing the number of goals scored per game
goals <- c(2, 3, 1, 0, 4, 2, 0, 1, 4, 3)
goals

##  [1] 2 3 1 0 4 2 0 1 4 3

#What is the total number of goals scored?
total_goals <- sum(goals)
total_goals

## [1] 20

#What is the average number of goals scored per game?
average_goals <- mean(goals)
average_goals

## [1] 2

#What is the maximum number of goals scored in a single game?
max_goals <- max(goals)
max_goals

## [1] 4

#What is the minimum number of goals scored in a single game?
min_goals <- min(goals)
min_goals

## [1] 0