Обобщение данных

Сейчас данные представлены в формате «одна строка на человека на вопрос». Чтобы построить график, нужно преобразовать их так, чтобы каждая строка соответствовала одному вопросу и содержала сводную информацию об ответах на него.

Это упражнение является частью курса

Категориальные данные в Tidyverse

Посмотреть курс

Инструкции к упражнению

Обобщите набор данных до двух столбцов: вопрос (то есть response_var) и новый столбец perc_rude — среднее значение столбца rude для каждого вопроса.
Сохраните результат как rude_behaviors и просмотрите новый набор данных.

Интерактивное практическое упражнение

Попробуйте выполнить это упражнение, дополнив этот пример кода.

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

Редактировать и запускать код