Data for Exercise 2.88
DogsA data frame/tibble with 20 observations on three variables
a factor with levels Beagle,
Boxer, Chihuahua, Chow, Dachshund,
Dalmatian, Doberman, Huskie, Labrador,
Pomeranian, Poodle, Retriever, Rotweiler,
Schnauzer, Shepherd, Shetland, ShihTzu,
Spaniel, Springer, and Yorkshire
numeric ranking
a factor with levels 1992, 1993, 1997,
and 1998
The World Almanac and Book of Facts, 2000.
Kitchens, L. J. (2003) Basic Statistics and Data Analysis. Pacific Grove, CA: Brooks/Cole, a division of Thomson Learning.
cor(Dogs$ranking[Dogs$year == "1992"], Dogs$ranking[Dogs$year == "1993"])
#> [1] 0.9413534
cor(Dogs$ranking[Dogs$year == "1997"], Dogs$ranking[Dogs$year == "1998"])
#> [1] 0.9005587
if (FALSE) {
library(ggplot2)
ggplot2::ggplot(data = Dogs, aes(x = reorder(breed, ranking), y = ranking)) +
geom_bar(stat = "identity") +
facet_grid(year ~. ) +
theme(axis.text.x = element_text(angle = 85, vjust = 0.5))
}