Попробуйте использовать это:
library(rvest)
url <- 'https://www.imdb.com/chart/top/'
webpage <- url %>% read_html()
title <- webpage %>% html_nodes('td.titleColumn a') %>% html_text()
title
#[1] "The Shawshank Redemption"
#[2] "The Godfather"
#[3] "The Godfather: Part II"
#[4] "The Dark Knight"
#[5] "12 Angry Men"
#[6] "Schindler's List"
#[7] "The Lord of the Rings: The Return of the King"
#...
Чтобы получить оценки:
ratings <- webpage %>%
html_nodes('td.ratingColumn strong') %>%
html_text() %>% as.numeric()
ratings
#[1] 9.2 9.1 9.0 9.0 8.9 8.9 8.9 .....