R Notebook for exam 1

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

cat("Total goals:", sum(goals), "\n")

Total goals: 22 

cat("Average goals per game:", mean(goals), "\n")

Average goals per game: 2.2 

cat("Maximum goals in one game:", max(goals), "\n")

Maximum goals in one game: 4 

cat("Minimum goals in one game:", min(goals), "\n")

Minimum goals in one game: 0