Winners of the Olympic Men's 1500m

Description

The data gives the winners of the men's 1500m race for the Olympic Games 1896 to 2004.

Usage

data("men1500m")

Format

A data frame with 25 observations on the following 5 variables.

year

the olympic year.

venue

city where the games took place.

winner

winner of men's 1500m race.

country

country the winner came from.

time

time (in seconds) of the winner.

Examples

  data("men1500m", package = "HSAUR2")
  op <- par(las = 2)
  plot(time ~ year, data = men1500m, axes = FALSE)
  yrs <- seq(from = 1896, to = 2004, by = 4)
  axis(1, at = yrs, labels = yrs)
  axis(2)
  box()
  par(op)

Results

R version 3.3.1 (2016-06-21) -- "Bug in Your Hair"
Copyright (C) 2016 The R Foundation for Statistical Computing
Platform: x86_64-pc-linux-gnu (64-bit)

R is free software and comes with ABSOLUTELY NO WARRANTY.
You are welcome to redistribute it under certain conditions.
Type 'license()' or 'licence()' for distribution details.

R is a collaborative project with many contributors.
Type 'contributors()' for more information and
'citation()' on how to cite R or R packages in publications.

Type 'demo()' for some demos, 'help()' for on-line help, or
'help.start()' for an HTML browser interface to help.
Type 'q()' to quit R.

> library(HSAUR2)
Loading required package: tools
> png(filename="/home/ddbj/snapshot/RGM3/R_CC/result/HSAUR2/men1500m.Rd_%03d_medium.png", width=480, height=480)
> ### Name: men1500m
> ### Title: Winners of the Olympic Men's 1500m
> ### Aliases: men1500m
> ### Keywords: datasets
> 
> ### ** Examples
> 
> 
>   data("men1500m", package = "HSAUR2")
>   op <- par(las = 2)
>   plot(time ~ year, data = men1500m, axes = FALSE)
>   yrs <- seq(from = 1896, to = 2004, by = 4)
>   axis(1, at = yrs, labels = yrs)
>   axis(2)
>   box()
>   par(op)
> 
> 
> 
> 
> 
> 
> dev.off()
null device 
          1 
>