imdbdf <- imdbdf[, c("actor_1_name", "movie_title", "gross", "imdb_score",

"plot_keywords")]