ソ連の宇宙犬：犬の視点
Duncan Geere がまとめたソ連の宇宙犬データベースを前処理したサンプルが space_dogs_df として読み込まれています。このデータセットの42行それぞれは、1匹または2匹のとても勇敢な犬が搭乗したテスト用ロケット打ち上げを表します。
目的は、このデータセットを整形し、各打ち上げについて犬ごとに1行になるようにすることです。
課題は、列名（name_1、name_2、gender_1、gender_2）で、区切り文字 _ の前の部分が2つの異なる変数（name と gender）を指す一方、後ろの部分は常に犬のID（1匹目または2匹目）を指すことです。
1957年に地球周回軌道へ到達した最初の動物、ライカ
この演習はコースの一部です
tidyrでデータを整形する
演習の手順
pivot_longer()の第1引数として、ピボットする列（name_1、name_2、gender_1、gender_2）を渡します。- 列名の前半部分を再利用できるように、
names_to引数を完成させます。 - すべてのロケットが2匹の犬を載せているわけではないので、
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
___
)