Goals_Exam

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

#Total goals scored
sum(goals)

## [1] 22

#Average number of Goals per Game
mean(goals)

## [1] 2.2

#Maximum number of Goals in a Game
max(goals)

## [1] 4

#Minimum number of Goals in a Game
min(goals)

## [1] 0