Details for all 19,961 runners in the 2017 Cherry Blossom Run, which is an annual road race that takes place in Washington, DC. Most runners participate in a 10-mile run while a smaller fraction take part in a 5k run or walk.
Format
A data frame with 19,961 observations on the following 9 variables.
- bib
Number on the runner's bib.
- name
Name of the runner, with only the initial of their last name.
- sex
Gender of the runner.
- age
Age of the runner.
- city
Home city of the runner.
- net_sec
Time to complete the race, after accounting for the staggered starting time, in seconds.
- clock_sec
Time to complete the race, ignoring the staggered starting time, in seconds.
- pace_sec
Average time per mile, in seconds.
- event
The event the racer participated in, either the
"10 Mile"race or the"5K".
Details
There was a time limit where all 10 Mile racers had to finish by. Can you figure out what that time is?
Examples
library(ggplot2)
# Finishing times
ggplot(run17, aes(x = net_sec)) +
geom_histogram(binwidth = 300) +
facet_wrap(~event, nrow = 2) +
labs(
title = "Finishing times for 2017 Cherry Blossom Run, by event",
subititle = "After accounting for the staggered starting time",
x = "Time to complete the race, in seconds",
y = "Frequency"
)
#> Warning: Removed 3 rows containing non-finite values (stat_bin).
# Pacing
ggplot(run17, aes(x = pace_sec)) +
geom_histogram(binwidth = 100) +
facet_wrap(~event, nrow = 2, scales = "free_y") +
labs(
title = "Pacing for 2017 Cherry Blossom Run, by event",
x = "Average time per mile, in seconds",
y = "Frequency"
)
#> Warning: Removed 3 rows containing non-finite values (stat_bin).
