olympic {VGAM} | R Documentation

## 2008 Summer Olympic Final Medal Count Data

### Description

Final count of medal winners by country for the 2008 Summer Olympic games in Beijing.

### Usage

    data(olympic)

### Format

A data frame with 87 observations on the following 6 variables.

`rank`
  a numeric vector, overall ranking of the countries.
`country`
  a character vector.
`gold`
  a numeric vector, number of gold medals.
`silver`
  a numeric vector, number of silver medals.
`bronze`
  a numeric vector, number of bronze medals.
`totalmedal`
  a numeric vector, total number of medals.

### Details

The event was held during August 8–24, 2008, in Beijing.

### Source

http://www.associatedcontent.com/article/979484/2008_summer_olympic_medal_count_total.html.

### References

The official English webite was http://en.beijing2008.cn.

### See Also

`grc`.

### Examples

    summary(olympic)
    ## maybe str(olympic) ; plot(olympic) ...
    ## Not run:
    with(head(olympic, n=8),
         barplot(rbind(gold,silver,bronze),
                 col=c("gold","grey","brown"),  # No "silver" or "bronze"!
                 names.arg=country, cex.names=0.5,
                 beside=TRUE, main="2008 Summer Olympic Final Medal Count",
                 ylab="Medal count", las=1,
                 sub="Top 8 countries; 'gold'=gold, 'grey'=silver, 'brown'=bronze"))
    ## End(Not run)

[Package VGAM version 0.7-9 Index]