平行過濾

你受僱為聯合國的資料顧問，他們想要對全球藝術相關科系的學生進行調查。他們已經彙整了一份包含設有藝術與人文學院之大學的資料集，並決定在每個國家各自挑選頂尖的藝術大學進行調查。

uni_list 是一個由資料框所組成的清單，每個元素代表一個國家的資料。每個資料框都包含一個 total_score 欄位。你可以使用以下函式：

filter_df <- function (df, select_n_unis) {
  df %>% 
    top_n(select_n_unis, total_score)
}

此函式需要 dplyr。引數 select_n_unis 用來指定要選出的頂尖大學數量。你被要求以平行方式，從每個 CSV 檔各自篩選出前 5 所大學。parallel 套件已為你載入。