Exam_1

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

#What is the total number of goals scored?

total_goals <- sum(goals)
total_goals

[1] 22

#What is the average number of goals scored per game?

average_goals <- mean(goals)
mean(goals)

[1] 2.2

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

maximum_goals <- max(goals)
maximum_goals 

[1] 4

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

minimum_goals <- min(goals)
minimum_goals

[1] 0