Мне нужно импортировать таблицу, которая выглядит как следующий фрейм данных:
> 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>
Я пытался использовать отдельную функцию в тайдыре, но мне нужно указать априори, сколько выходных столбцов мне нужно.
Большое спасибо за Вашу помощь
Вы можете сначала подсчитать количество столбцов, которые он может занять, а затем использовать 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)]