get_medals.Rd
Scrape Olympic medal board
get_medals(game)
the Olympic game, in the format of tokyo-2020, see the slug column in the built-in olympic_game data
a tibble of medal table
get_medals(game = "tokyo-2020")
#> # A tibble: 93 × 6
#> game team gold silver bronze total
#> <chr> <chr> <dbl> <dbl> <dbl> <dbl>
#> 1 tokyo-2020 USA 39 41 33 113
#> 2 tokyo-2020 CHN 38 32 19 89
#> 3 tokyo-2020 JPN 27 14 17 58
#> 4 tokyo-2020 GBR 22 20 22 64
#> 5 tokyo-2020 ROC 20 28 23 71
#> 6 tokyo-2020 AUS 17 7 22 46
#> 7 tokyo-2020 NED 10 12 14 36
#> 8 tokyo-2020 FRA 10 12 11 33
#> 9 tokyo-2020 GER 10 11 16 37
#> 10 tokyo-2020 ITA 10 10 20 40
#> # … with 83 more rows