poweRof10
is a small package that scrapes data from athletics rankings
website www.thepowerof10.info. I’m a big athletics fan and created
poweRof10
for a bit of fun to analyse my own performances, but thought
it might be worth sharing here. The package is still a little rough
around the edges, but the basic functionality should work well enough!
Check out this blog post for some more examples.
Install from github with:
# install.packages("remotes")
remotes::install_github("hfshr/poweRof10")
You can get the rankings for a specific event/year/gender/age group
using the get_event()
function:
get_event(event = "100", agegroup = "ALL", gender = "M", year = 2016, top_n = 10) %>%
select(rank, perf, name, venue)
#> rank perf name venue
#> 1 1 9.96 Joel Fearon Bedford
#> 2 2 10.01 Richard Kilty Hexham
#> 3 9.92 Gavardo, ITA
#> 4 2 10.01 Chijindu Ujah Rio de Janeiro, BRA
#> 5 9.97 Birmingham
#> 6 4 10.04 James Ellington Amsterdam, NED
#> 7 9.96 Birmingham
#> 8 4 10.04 Reece Prescod Bedford
#> 9 6 10.08 Harry Aikines-Aryeetey Loughborough
#> 10 10.02 Birmingham
Alternatively, you can search for an individual athlete and get their
performance history with get_athlete()
:
get_athlete(fn = "Harry", sn = "Fisher", club = "Cardiff/Cardiff Met Uni") %>%
select(event, perf, pos, venue, date) %>%
head(10)
#> event perf pos venue date
#> 1 8.6KXC 31:56 40 Chepstow 8 Feb 20
#> 2 parkrun 17:33 16 Cardiff 5 Oct 19
#> 3 9.3KXC 35:28 69 Blaise Castle 7 Dec 19
#> 4 400 49.00 1 Sheffield 18 Feb 18
#> 5 400 49.16 1 Bedford 5 May 18
#> 6 400 49.32 5 Sheffield 18 Feb 18
#> 7 400 49.43 5 Bedford 6 May 18
#> 8 400 49.66 1 Sheffield 17 Feb 18
#> 9 400 49.86 1 Cardiff 27 Jan 18
#> 10 400 50.18 1 Cardiff 27 Jan 18
Thanks to the team that keep www.thepowerof10.info up and running, it’s an invaluable resource for many!
This software is in no way affiliated, endorsed, or approved by www.thepowerof10.info or any of its affiliates.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.