##TOP 10 MOVIES Below is a list of the top 10 movies in the year 2010

movies10=subset(movies,Year==2010)
top_movies=arrange(movies10, desc(Rating))
print(top_movies[c(1,2,8)][1:10,])
##                       Title     Genre Rating
## 1                 Inception    Action    8.8
## 2               Toy Story 3 Animation    8.3
## 3                 Incendies     Drama    8.2
## 4            Shutter Island   Mystery    8.1
## 5  How to Train Your Dragon Animation    8.1
## 6                Black Swan     Drama    8.0
## 7         The King's Speech Biography    8.0
## 8                   Tangled Animation    7.8
## 9               The Fighter    Action    7.8
## 10                 Kick-Ass    Action    7.7

Scatter Plot

Below is a scatter plot for Rating vs. Runtime for all movies in 2010: