開始使用免費開始

蘇聯太空犬:從狗的角度看

你將使用由 Duncan Geere 蒐集並經過前處理的蘇聯太空犬資料庫之樣本,課程已預先載入為 space_dogs_df。這個資料集中共有 42 筆列,每一列代表一次測試火箭發射,火箭上搭載了一隻或兩隻非常勇敢的狗。

你的目標是把資料調整為:每次發射中,每一隻狗各有一列。

挑戰在於欄名(name_1name_2gender_1gender_2)裡,底線(_)前半段可能對應到兩個不同的變數(name 與 gender),而後半段一律對應到狗的編號(第 1 隻或第 2 隻)。

Laika

Laika,1957 年成為第一個繞行地球的動物

本練習屬於課程

使用 tidyr 重塑資料

檢視課程

練習說明

  • pivot_longer() 的第一個引數中,傳入要轉換的欄位(name_1name_2gender_1gender_2)。
  • 完成 names_to 引數,讓欄名的前半段可以被重用。
  • 確保移除 NA 值,因為不是每次發射都有兩隻狗。

動手互動練習

試著完成這個範例程式碼,體驗一下這個練習。

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
    ___
  )
編輯並執行程式碼