为数据中的新列切片列表

Question

我有一个数据。表与一个选项卡分隔字符串，我想分开成新的列。然而，如果我按索引切片，我只得到每个字段第一行的第一个元素。我该怎么做呢?

library(data.table)
a <- c("feature1titem1titem2")
dt1 <- data.table(a)
a <- c("feature2titem3titem4")
dt2 <- data.table(a)
dt <- rbindlist(list(dt1, dt2))
dt[, split := mapply(str_split, a, "t", n = 2)]
# how to get a feature column from that?

Answer 1

transpose:

dt[, transpose(stringr::str_split(a,"t"))]
V1     V2     V3
<char> <char> <char>
1: feature1  item1  item2
2: feature2  item3  item4