**R Code**

Q1) a. **library(nycflights13)** Use geom_tile() together with dplyr to explore how average flight delays (average arrival delay) vary by destination and month of year. What makes the plot difficult to read? How could you improve it?

Q1) b. **library(diamonds)** Visualize the distribution of carat, partitioned by price. How does the price distribution of very large diamonds compare to small diamonds? Is it as you expect, or does it surprise you?