分隔列但添加新行而不是列

时间:2017-07-10 09:05:54

标签: r bind tidyr

我需要将一列但不是多列分开,而不是需要具有重复值的新行。

一些数据

library(tidyverse)
d <- tibble(V1=1:6, V2=c(paste(letters[1:5], letters[6:10], sep=", "), "g"))
d
# A tibble: 6 × 2
     V1    V2
  <int> <chr>
1     1  a, f
2     2  b, g
3     3  c, h
4     4  d, i
5     5  e, j
6     6     g

使用tidyr将V2分隔为新列非常简单。

d  %>% separate(V2, c("V3", "V4"), ",") 

但最后我想要这样的东西。

V1   V2
1     a     
1     f
2     b   
2     g
3     c
3     h
4     d
4     i
5     e
5     j
6     g

试图加入到最后或使用此代码绑定行但没有成功:

d  %>% separate(V2, c("V3", "V4"), ",") %>% 
       select(1,2) %>% bind_rows(select(1,3))

0 个答案:

没有答案