Hill races in Scotland
Each year the Scottish Hill Runners Association publishes a list of hill races in Scotland for the year. These data consist of record time, distance, and cumulative climb of 35 of those races. The aim of the statistical analysis of these data is to explain the differences between the record time of the races using their differences on distance and cumulative climb. See Agresti (2015, page 62).
data(races)
A data frame with 35 rows and 4 variables:
a character vector giving the names of the races.
a numeric vector giving the distance, in miles, of the races.
a numeric vector giving the cumulative climb, in thousands of feet, of the races.
a numeric vector giving the record time, in minutes, of the races.
Agresti A. (2015) Foundations of Linear and Generalized Linear Models. John Wiley & Sons, New Jersey.
races2 <- within(races,cli <- cut(cclimb, include.lowest=TRUE,
breaks=quantile(cclimb, probs=c(0:2)/2),
labels=c("low","high")))
with(races2,{
plot(log(distance), log(rtime),
col=apply(as.matrix(cli),1,function(x) switch(x,"low"="red","high"="blue")),
pch=apply(as.matrix(cli),1,function(x) switch(x,"low"=15,"high"=16)))
legend(0.5, 5.5, legend=c("low","high"), title="Cumulative climb",
col=c("red","blue"), pch=c(15,16), bty="n", cex=0.75,
title.adj=0.4, y.intersp=0.5, x.intersp=0.3)
})Please choose more modern alternatives, such as Google Chrome or Mozilla Firefox.