Sumarizace dat

Naše data jsou teď stále ve formátu jeden řádek na osobu a otázku. Abychom je mohli zobrazit v grafu, potřebujeme to změnit tak, aby každý řádek představoval jednu otázku se souhrnnou informací o odpovědích na ni.

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

Kategorická data v Tidyverse

Zobrazit kurz

Pokyny k cvičení

Sumarizuj datovou sadu do dvou sloupců: otázky (tj. response_var) a nového sloupce perc_rude, který bude obsahovat průměr sloupce rude pro každou otázku.
Ulož výsledek jako rude_behaviors a pak nový dataset zobraz.

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

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

rude_behaviors <- 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
	filter(!is.na(value)) %>%
    mutate(rude = if_else(value %in% c("No, not rude at all", "No, not at all rude"), 0, 1)) %>%
    # Group by response_var
    ___ %>%
    # Create perc_rude, the percent considering each behavior rude
    ___

rude_behaviors

Upravit a spustit kód