提问人：Luca Monno 提问时间：5/29/2019 更新时间：5/29/2019 访问量：2168
使用 R/tidyverse [duplicate] 分隔未定义列数中的数据帧列
Separate a column of a dataframe in undefined number of columns with R/tidyverse [duplicate]
问：
我必须导入一个表，如以下数据帧所示：
> df = data.frame(x = c("a", "a.b","a.b.c","a.b.d", "a.d"))
> df
x
1 <NA>
2 a
3 a.b
4 a.b.c
5 a.b.d
6 a.d
我想根据我找到多少个分隔符将第一列分隔在一列或多列中。
输出应该像这样大声喧哗
> df_separated
col1 col2 col3
1 a <NA> <NA>
2 a b <NA>
3 a b c
4 a b d
5 a d <NA>
我尝试在 tidyr 中使用单独的函数，但我需要先验地指定我需要多少个输出列。
非常感谢您的帮助
答：
12赞
Ronak Shah
5/29/2019
#1
您可以先计算它可以占用的列数，然后使用 。separate
nmax <- max(stringr::str_count(df$x, "\\.")) + 1
tidyr::separate(df, x, paste0("col", seq_len(nmax)), sep = "\\.", fill = "right")
# col1 col2 col3
#1 a <NA> <NA>
#2 a b <NA>
#3 a b c
#4 a b d
#5 a d <NA>
评论
library(data.table); DT <- as.data.table(df); DT[, tstrsplit(x, split = ".", fixed = TRUE)]