library(readxl) library(dplyr) netflix_df <- read_excel(“Netflix.xlsx”) netflix_df <- netflix_df %>% separate_rows(cast, sep = “,”) netflix_df <- netflix_df %>% rename(actor = cast) top_actors <- netflix_df %>% count(actor, sort = TRUE) %>% top_n(6) print(top_actors)