我需要将一列但不是多列分开,而不是需要具有重复值的新行。
一些数据
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))