#represents 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
# total number of goals scored
total_goals <- sum(goals)
total_goals
## [1] 20
#average number of goals scored
avg_goals_Scored <- mean(goals)
avg_goals_Scored
## [1] 2
#maximum number number of goals scored
max_gaols_scored <- max(goals)
max_gaols_scored
## [1] 4
#minimum number of goals scored
min_gaols_scored <- min(goals)
min_gaols_scored
## [1] 0