Data for Statistical Insight Chapter 10
Supercar
A data frame/tibble with 30 observations on two variables
top speed (in miles per hour) of car without redlining
name of sports car
Car and Drvier (July 1995).
Kitchens, L. J. (2003) Basic Statistics and Data Analysis. Pacific Grove, CA: Brooks/Cole, a division of Thomson Learning.
boxplot(speed ~ car, data = Supercar, col = rainbow(6),
ylab = "Speed (mph)")
summary(aov(speed ~ car, data = Supercar))
#> Df Sum Sq Mean Sq F value Pr(>F)
#> car 4 1456 364.1 25.14 1.9e-08 ***
#> Residuals 25 362 14.5
#> ---
#> Signif. codes: 0 ‘***’ 0.001 ‘**’ 0.01 ‘*’ 0.05 ‘.’ 0.1 ‘ ’ 1
anova(lm(speed ~ car, data = Supercar))
#> Analysis of Variance Table
#>
#> Response: speed
#> Df Sum Sq Mean Sq F value Pr(>F)
#> car 4 1456.52 364.13 25.145 1.903e-08 ***
#> Residuals 25 362.02 14.48
#> ---
#> Signif. codes: 0 ‘***’ 0.001 ‘**’ 0.01 ‘*’ 0.05 ‘.’ 0.1 ‘ ’ 1