Ruční slučování úrovní

V dotazníku bylo celkem 16 pracovních pozic (včetně „Other"), ze kterých mohli respondenti vybírat. Pojďme je sloučit do několika velkých kategorií: „Computer Scientist", „Data analyst/scientist/engineer", „Researcher" a „Other". Datová sada multiple_choice_responses je už načtená.

Toto cvičení je součástí kurzu

Kategorická data v Tidyverse

Zobrazit kurz

Pokyny k cvičení

Slouč úrovně proměnné CurrentJobTitleSelect do nové proměnné grouped_titles.
Pak vezmi grouped_titles a vše, co nepatří do žádné ze tří sloučených kategorií, přesuň do „Other Title".
Nakonec zjisti počet výskytů pro všechny sloučené kategorie.

Interaktivní cvičení na vyzkoušení si v praxi

Vyzkoušejte si toto cvičení dokončením tohoto ukázkového kódu.

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
    ___(___)

Upravit a spustit kód