Skip to content

Instantly share code, notes, and snippets.

@sriyoda
Created February 1, 2016 20:37
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save sriyoda/a072ddd0e30166d3deb5 to your computer and use it in GitHub Desktop.
Save sriyoda/a072ddd0e30166d3deb5 to your computer and use it in GitHub Desktop.
movies2 <- filter(movies, worldwide < 5e+08, rating > 1 & rating < 5, genre == 'Sci-Fi' | genre == 'Animation' | genre == 'Comedy' | genre == 'Drama' | genre == 'Action')
z <- ggplot(movies2, aes(x=domestic)) + geom_density(aes(color=genre))
v <- ggplot(movies2, aes(x=overseas)) + geom_density(aes(color=genre))
plot_grid(v, z, labels=c("A", "B", "C"), ncol = 1, nrow = 2)
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment