Dichotomizace proměnných
Teď, když máme názvy otázek uklizené, zaměříme se na proměnnou s odpověďmi. V původní analýze autoři sledovali, kolik procent lidí považuje určité chování za poněkud nebo velmi nezdvořilé. Abychom jejich výsledky zreplikovali, musíme upravit proměnnou rude tak, aby spojila odpovědi „poněkud nezdvořilé" a „velmi nezdvořilé" do jedné kategorie.
Toto cvičení je součástí kurzu
Kategorická data v Tidyverse
Pokyny k cvičení
- Odstraň řádky s hodnotou NA ve sloupci value
- Vytvoř novou proměnnou rude, která nabývá hodnoty 0, pokud sloupec value obsahuje "No, not rude at all" nebo "No, not at all rude", a hodnoty 1 v ostatních případech.
Interaktivní cvičení na vyzkoušení si v praxi
Vyzkoušejte si toto cvičení dokončením tohoto ukázkového kódu.
dichotimized_data <- gathered_data %>%
mutate(response_var = str_replace(response_var, '.*rude to ', '')) %>%
mutate(response_var = str_replace(response_var, 'on a plane', '')) %>%
# Remove rows that are NA in the value column
___ %>%
# Dichotomize the value variable to make a new variable, rude
mutate(rude = if_else(value ___ c('No, not rude at all', 'No, not at all rude'), ___, ___))