Question 3

Author

Xavi

Quarto

Quarto enables you to weave together content and executable code into a finished document. To learn more about Quarto see https://quarto.org.

player <- 
  read_delim("https://myxavier-my.sharepoint.com/:x:/g/personal/mendiburuperezf_xavier_edu/EZRraEZwJW5NlF_OMd3RpCoBSY4PCwRpJi5oV7k7rrCxBQ?download=1", 
             delim = ";")
Rows: 2921 Columns: 143
── Column specification ────────────────────────────────────────────────────────
Delimiter: ";"
chr   (5): Player, Nation, Pos, Squad, Comp
dbl (138): Rk, Age, Born, MP, Starts, Min, 90s, Goals, Shots, SoT, SoT%, G/S...

ℹ Use `spec()` to retrieve the full column specification for this data.
ℹ Specify the column types or set `show_col_types = FALSE` to quiet this message.

Question

What league has the youngest players?

player %>% 
  ggplot(aes(x = Comp, y = Age)) +
  geom_boxplot()
Warning: Removed 1 rows containing non-finite values (`stat_boxplot()`).

We can observe that the league that has the youngest average Age is Ligue 1 and the Bundesliga. This makes sense because even though they are in the top 5 most popular leagues in the world, they are not the strongest. Because of this younger athletes get to show their talent in these leagues before going into the bigger leagues.