LC 4.11

# Load Packages
library(dplyr)
library(ggplot2)
library(babynames)

# Load babynames data set
data(babynames)

# Get all babies named Audrey or Jerry
all_audreys_and_jerrys <- filter(babynames, name=="Audrey" | name=="Jerry")

# Plot using facets
ggplot(data=all_audreys_and_jerrys, aes(x=year, y=prop, col=sex)) + 
  geom_line() + 
  facet_wrap(~name)

Flip the facet_ and color variables. i.e. show a similar plot with colors representing the name and faceted by sex. Which do you think is preferable?

Solution

ggplot(data=all_audreys_and_jerrys, aes(x=year, y=prop, col=name)) + 
  geom_line() + 
  facet_wrap(~sex)

Neither plot is “right” or “wrong” in any absolute sense of the word: it depends on what comparison you want to emphasize. The only comparison I find interesting is that while Audrey is almost exclusively female, Jerry was not exclusively male: there was a brief period in the 1940’s where some females were named Jerry. IMO the earlier plot emphasizes this better.