A dataset giving world records in track and field running events for various distances and different age groups.
data(best.times)
A data frame with 113 observations on the following 6 variables.
Distance in meters (42195 is a marathon)
Name of record holder
Date of record
Time in seconds
Time as character
Age at time of record
Age-graded race results allow competitors of different ages to compare their race performances. This data set allows one to see what the relationship is based on peak performances.
# NOT RUN {
data(best.times)
attach(best.times)
by.dist = split(best.times,as.factor(Dist))
lm(scale(Time) ~ age, by.dist[['400']])
dists = names(by.dist)
lapply(dists, function(n) print(lm(scale(Time) ~ age, by.dist[[n]])))
# }
Run the code above in your browser using DataLab