extrobe
2/5/2017 - 6:05 PM

Faceted Histogram

Faceted Histogram

common_cyl %>%
  ggplot(aes(x = hwy_mpg)) +
  geom_histogram() +
  facet_grid(ncyl ~ suv) +
  ggtitle("Title")
ggplot(cars, aes(x= msrp)) +
    geom_density() +
    facet_grid(pickup ~ rear_wheel, labeller = label_both)

table(cars$rear_wheel, cars$pickup)