Anjing luar angkasa Soviet, dari sudut pandang anjing

Anda akan mengerjakan sampel yang telah dipraolah dari basis data anjing luar angkasa Uni Soviet yang disusun oleh Duncan Geere dan sudah dimuat sebagai space_dogs_df. Masing-masing dari 42 baris dalam himpunan data ini mewakili peluncuran roket uji yang membawa satu atau dua anjing yang sangat pemberani.

Tujuan Anda adalah membentuk ulang himpunan data ini sehingga untuk setiap peluncuran, setiap anjing memiliki satu baris.

Tantangannya adalah pada header kolom (name_1, name_2, gender_1, dan gender_2), bagian sebelum pemisah _ dapat merujuk ke dua variabel berbeda (name dan gender), sementara bagian kedua selalu merujuk ke ID anjing (anjing ke-1 atau ke-2).

Laika

Laika, hewan pertama yang mengorbit Bumi pada tahun 1957

Latihan ini merupakan bagian dari kursus

Mengubah Bentuk Data dengan tidyr

Lihat Kursus

Instruksi latihan

Sebagai argumen pertama untuk pivot_longer(), berikan kolom-kolom yang akan diputar (name_1, name_2, gender_1, dan gender_2).
Lengkapi argumen names_to sehingga bagian pertama dari header kolom digunakan kembali.
Pastikan nilai NA dibuang karena tidak semua roket membawa dua anjing.

Latihan interaktif langsung praktik

Cobalah latihan ini dengan melengkapi kode contoh ini.

space_dogs_df %>% 
  pivot_longer(
    # Add the columns to pivot
    ___,
    names_sep = "_",
    # Complete the names_to argument to re-use the first part of the column headers
    names_to = c(___,  "dog_id"),
    # Make sure NA values are dropped
    ___
  )

Edit dan Jalankan Kode