Data for Exercise 10.33

`Lodge`

A data frame/tibble with 45 observations on six variables

- traffic
a numeric vector indicating the amount of vehicles that passed a site in 1 hour

- site
a numeric vector with values

`1`

,`2`

, and`3`

- ranks
ranks for variable

`traffic`

Kitchens, L. J. (2003) *Basic Statistics and Data Analysis*.
Pacific Grove, CA: Brooks/Cole, a division of Thomson Learning.

```
boxplot(traffic ~ site, data = Lodge, col = cm.colors(3))
anova(lm(traffic ~ factor(site), data = Lodge))
#> Analysis of Variance Table
#>
#> Response: traffic
#> Df Sum Sq Mean Sq F value Pr(>F)
#> factor(site) 2 3951.6 1975.82 9.1838 0.0004913 ***
#> Residuals 42 9036.0 215.14
#> ---
#> Signif. codes: 0 ‘***’ 0.001 ‘**’ 0.01 ‘*’ 0.05 ‘.’ 0.1 ‘ ’ 1
```