手動合併層級

問卷提供了 16 種職稱（包含「Other」）供作答。讓我們把它們合併成幾個大類：「Computer Scientist」、「Data analyst/scientist/engineer」、「Researcher」以及「Other」。資料集 multiple_choice_responses 已為你載入。

本練習屬於課程

Tidyverse 的類別資料

檢視課程

練習說明

將 CurrentJobTitleSelect 的層級合併為一個新變數 grouped_titles。
接著針對 grouped_titles，把不屬於前述三個合併後職稱的項目全部設為「Other Title」。
最後，計算所有合併後職稱的筆數。

動手互動練習

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

multiple_choice_responses %>%
    # Create new variable, grouped_titles, by collapsing levels in CurrentJobTitleSelect
    ___(grouped_titles = ___(CurrentJobTitleSelect, 
        "Computer Scientist" = c("Programmer", "Software Developer/Software Engineer"), 
        "Researcher" = "Scientist/Researcher", 
        "Data Analyst/Scientist/Engineer" = c("DBA/Database Engineer", "Data Scientist", 
                                              "Business Analyst", "Data Analyst", 
                                              "Data Miner", "Predictive Modeler"))) %>%
    # Keep all the new titles and turn every other title into "Other"
    ___(grouped_titles = ___(grouped_titles, 
                             ___ = c("Computer Scientist", 
                                     "Researcher", 
                                     "Data Analyst/Scientist/Engineer"))) %>% 
    # Get a count of the grouped titles
    ___(___)

編輯並執行程式碼