#Adding home goals per team per season
B <- FullEPL %>%
group_by(Seasons,HomeTeam) %>%
mutate(Home_goals = sum(FTHG))

#adding away goals per team per season
C <- B %>%
  group_by(Seasons,AwayTeam) %>%
  mutate(Away_goals = sum(FTAG))