- load the
`driving.Rdata`

file. - type
`head( driving )`

to look at the first few observations - load the following packages:
`lsr`

```
load( "~/Work/Research/Rbook/workshop_dsto/datasets/driving.Rdata")
head( driving )
library(lsr)
```

- Draw as scatter plot of age (
`age`

) against RT on the first test (`rt_time1`

) - Customise the plot: give it a title, x-axis and y-axis labels, and maybe change the marker.

- Draw box plots for age, broken down by distractor
- Make it pretty

- Draw a histogram showing the distribution of the number of errors made at the first test.
- Make it pretty

- Draw a bar graph showing the number of people who were tested under each of the three distractor conditions
- Make it pretty

- Plot the mean number of errors at time 1 by distractor type, with 95% confidence intervals
- Plot the mean number of errors at time 1 by distractor type and by whether the test was taken during peak hour traffic, with 95% confidence intervals
- Redo the last plot, but switch the order of the two grouping factors in the formula

- Use the Rstudio tools to save one of the plots that youâ€™ve drawn