Radzieckie psy kosmiczne – perspektywa psa

Będziesz pracować na przetworzonym fragmencie bazy danych radzieckich psów kosmicznych, przygotowanej przez Duncana Geere'a, wczytanej jako space_dogs_df. Każdy z 42 wierszy tego zbioru danych reprezentuje próbny start rakiety, na pokładzie której znajdował się jeden lub dwa bardzo dzielne psy.

Twoim zadaniem jest przekształcenie tego zbioru danych tak, aby każdy pies z każdego startu miał swój własny wiersz.

Wyzwanie polega na tym, że w nagłówkach kolumn (name_1, name_2, gender_1 i gender_2) część przed separatorem _ może wskazywać na dwie różne zmienne (imię i płeć), natomiast część po separatorze zawsze wskazuje na identyfikator psa (1.^st lub 2.^nd pies).

Laika

Łajka – pierwsze zwierzę, które okrążyło Ziemię w 1957 roku

To ćwiczenie jest częścią kursu

Przekształcanie danych z tidyr

Zobacz kurs

Instrukcje do ćwiczenia

Jako pierwszy argument funkcji pivot_longer() podaj kolumny do przestawienia (name_1, name_2, gender_1 i gender_2).
Uzupełnij argument names_to tak, aby pierwsza część nagłówków kolumn była ponownie wykorzystana.
Zadbaj o usunięcie wartości NA, ponieważ nie wszystkie rakiety miały na pokładzie dwa psy.

Interaktywne ćwiczenie praktyczne

Spróbuj tego ćwiczenia, uzupełniając ten przykładowy kod.

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
    ___
  )

Edytuj i uruchom kod