ggplot(mtcars, aes(wt, mpg)) + geom_point() + facet_grid(am ~ cyl)
theme_bw
ggplot(mtcars, aes(wt, mpg)) + geom_point() + facet_grid(am ~ cyl) + theme_bw()