# NOT RUN {
## Tufte's Cancer Graph (to the correct scale)
data(cancer)
slopegraph(cancer, col.lines = 'gray', xlim = c(-.5,5.5),
xlabels = c('5 Year','10 Year','15 Year','20 Year'))
## Tufte's GDP Graph
data(gdp)
slopegraph(gdp, col.line='gray', xlabels = c('1970','1979'),
main = 'Current Receipts of Goverment as a Percentage of Gross Domestic Product')
## Ranking of U.S. State populations
data(states)
slopegraph(states, col.line='black', ylim = c(38,0),
main = 'Relative Rank of U.S. State Populations, 1790-1870')
# }
Run the code above in your browser using DataLab