r - Tidyverse を使用してリストをベクターに変換する

Question

「R for Data Science」の簡単な例を次に示します。

df <- tribble(
  ~x1,
  "a,b,c",
  "d,e,f,g"
)

これで、次のようなリスト列を作成できます。

df <- df %>%
  mutate(x2 = stringr::str_split(x1, ","))

データは次のようになります。

# A tibble: 2 × 2
       x1        x2
    <chr>    <list>
1   a,b,c <chr [3]>
2 d,e,f,g <chr [4]>

ここに質問があります: x2 しか持っていない場合、どうすれば x1 を回復できますか?

unnest()データの形状が変わるため、機能しません。

Answer 1

試す

df %>% 
  mutate(x1_new = map_chr(x2, paste, collapse = ','))

purrr（あなたが言及したので、パッケージをロードしたと思いますtidyverse）

Answer 2

非常に素晴らしい。また、tidyverse内で：

df <- df %>% 
  mutate(x3 = map_chr(x2, stringr::str_c, collapse = ','))
df

も機能します。