r - 如何根据另一个数据表创建一个数据表，其中一行填充 NA

Question

假设我有以下 data.table(但可以将其视为一个包含许多列且名称会动态更改的表)

DT <- data.table(a=rep(1L,3),b=rep(1.32,3),d=rep("qwe",3))
DT
   a    b   d
1: 1 1.32 qwe
2: 1 1.32 qwe
3: 1 1.32 qwe

现在假设我想用 NAs 创建一行，然后我可以用 rbindlist 用 DT。

首先尝试(它不工作)

DT1 <- DT[1][,colnames(DT):=NA]
DT1
    a  b  d
1: NA NA NA
rbindlist(list(DT1,DT))
      a    b  d
1:   NA   NA NA
2: TRUE TRUE NA
3: TRUE TRUE NA
4: TRUE TRUE NA

这是行不通的，因为 DT1 是在 :=NA 被调用时转换的(这似乎是一种叫做 plonking 的东西，因为如果你在 时提供完整的列: = RHS 类型将覆盖 LHS...)

接下来的问题是，我如何提取 data.table 的一行并用 NA 填充它或创建一个 data.table，用具有 NA 的 NA 填充与另一个相同的列名和列类型

Answer 1

有很多方法，这里是一个:

rbind(DT[NA], DT)
#    a    b   d
#1: NA   NA  NA
#2:  1 1.32 qwe
#3:  1 1.32 qwe
#4:  1 1.32 qwe