Gegevens samenvatten

Op dit moment staat onze data nog in het formaat van één rij per persoon per vraag. Om het te kunnen visualiseren, willen we dit omzetten zodat elke rij een vraag is met samenvattende informatie over de antwoorden op die vraag.

Deze oefening maakt deel uit van de cursus

Categorische gegevens in de Tidyverse

Cursus bekijken

Oefeninstructies

Vat de gegevens samen in twee kolommen: de vraag (dus response_var) en een nieuwe kolom, perc_rude, het gemiddelde van de kolom rude voor elke vraag.
Sla dit op als rude_behaviors en bekijk vervolgens je nieuwe gegevensset.

Praktische interactieve oefening

Probeer deze oefening eens door deze voorbeeldcode in te vullen.

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

Code bewerken en uitvoeren