開始使用免費開始

找到贏家！

在這個練習中，你要辨識一個重要指標——哪位使用者發佈了被轉推次數最多的推文？

這類資訊在做社群媒體分析時很重要：它能告訴你在資料集中最「有名」的推文。之後這有助於你判斷特定主題／標籤下的關鍵主題與關鍵使用者。

我們會用 purrr 從語料中找出被轉推最多的推文，並看看該推文背後的使用者。因為我們只想分析原始推文，所以我們已提供先前練習建立的 non_rt 清單。

本練習屬於課程

使用 purrr 的 R 語言中級函式程式設計

檢視課程

練習說明

  • 使用合適的 map_*() 變體擷取所有 "retweet_count" 元素，並將結果傳入 max()。

  • 預先建立一個 map_at()，其中 .at 為 "retweet_count"，.f 為一個測試是否等於 max_rt 的 mapper。

  • 將這個新函式對 non_rt 進行對應（map），只保留 "retweet_count"，然後攤平結果。

  • 在主控台印出結果的 $screen_name 和 $text。

動手互動練習

試著完成這個範例程式碼，體驗一下這個練習。

# Get the max() of "retweet_count" 
max_rt <- ___(non_rt, ___) %>% 
  ___()

# Prefill map_at() with a mapper testing if .x equal max_rt
max_rt_calc <- ___(___, .at = "retweet_count", .f := ~ ___ )

res <- non_rt %>%
  # Call max_rt_calc() on each element
  ___(___) %>% 
  # Keep elements where retweet_count is non-zero
  ___("___") %>% 
  # Flatten it
  ___()

# Print the "screen_name" and "text" of the result
res$screen_name
res$text
編輯並執行程式碼