Dikotomisasi variabel
Sekarang setelah kita merapikan nama pertanyaan, mari kita kerjakan variabel respons. Dalam analisis asli, mereka melihat persentase orang yang menilai sebuah perilaku agak atau sangat tidak sopan. Untuk mereplikasinya, kita perlu mengubah variabel rude dari respons saat ini menjadi variabel yang menggabungkan jawaban agak tidak sopan dan sangat tidak sopan.
Latihan ini adalah bagian dari kursus
Data Kategorikal di Tidyverse
Petunjuk latihan
- Hapus baris dengan NA di kolom value
- Buat variabel baru, rude, yang bernilai 0 jika kolom value adalah "No, not rude at all" atau "No, not at all rude" dan 1 selain itu.
Latihan interaktif praktis
Cobalah latihan ini dengan menyelesaikan kode contoh berikut.
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'), ___, ___))