diff --git a/B5.SingleGamexG.md b/B5.SingleGamexG.md index 415b2ef..1247cdd 100644 --- a/B5.SingleGamexG.md +++ b/B5.SingleGamexG.md @@ -51,7 +51,7 @@ shotData <- events %>% filter(match_id == randomMatch & shot.statsbomb_xg > 0) shotData$Timer <- shotData$minute + (shotData$second / 60) ## drop all unneeed data to make it easier to work with the data -shotData <- shotData[c(19,54,61,147)] +shotData <- shotData[c(19,54,61,141)] ## Create a dataframe just for the Team 1 and Team 2 T1_shotData <- shotData %>% filter(team.name == unique(shotData$team.name)[1])