A thin wrapper around tidyr::pivot_longer()
and tidyr::separate_rows()
.
gather_people(episodes)
A tibble with new columns "role"
and "person"
, one row per person.
if (FALSE) { # \dontrun{
incomparable <- incomparable_get_episodes(incomparable_get_shows())
incomparable_wide <- gather_people(incomparable)
} # }