Examining the relationship between socioeconomic status measured as the percentage of children in a neighborhood receiving reduced-fee lunches at school (lunch) and the percentage of bike riders in the neighborhood wearing helmets (helmet).
A data frame with 12 observations representing neighborhoods on the following 2 variables.
Percent of students receiving reduced-fee school lunches.
Percent of bike riders wearing helmets.
library(ggplot2) ggplot(helmet, aes(x = lunch, y = helmet)) + geom_point()