exam1_q14

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

# A - What's the total number of goals scored? 
sum(goals)

## [1] 22

# B - Avg goals per game?
mean(goals)

## [1] 2.2

# C - What's the max?
max(goals)

## [1] 4

# D - What's the min? 
min(goals)

## [1] 0