如何在nrow=0的data.table中添加空行？及data.table空行添加方法

嘿，这两个关于data.table添加空行的问题我刚好熟，直接给你上实用的解法和代码示例：

首先先构造一个空的data.table做示例：

library(data.table)
dt_empty <- data.table(col1 = integer(), col2 = character())

这里有两种简洁的方式添加空行：

• 方法一：直接通过索引生成新行
  data.table里可以直接用索引定位到超出当前行数的位置，自动生成对应列类型的缺失值行：

dt_empty[1, ]

执行后你会得到一个1行的data.table，col1是整数类型的缺失值NA_integer_，col2是字符类型的NA_character_，完美匹配原表的列类型。

• 方法二：用rbind拼接缺失值行
  先构造和原表列数一致的缺失值列表，再拼接进去：

dt_empty <- rbind(dt_empty, as.list(rep(NA, ncol(dt_empty))))

这种方式也能达到效果，不过第一种方法更直接省心。

假设我们有一个普通的非空data.table：

dt <- data.table(col1 = c(1,2,3), col2 = c("a","b","c"))

对应data.frame里常用的添加空行操作，data.table里可以这样实现：

• 方法一：类似data.frame的索引赋值
  利用data.table的特殊变量.N（代表当前表的总行数），直接给新行赋值NA：

dt[.N + 1, ] <- NA

这和data.frame里df[nrow(df)+1, ] <- NA的效果完全一致，执行后表末尾会多一行全NA的记录。

• 方法二：用rbind拼接NA行
  对应data.frame的rbind(df, NA)，data.table里可以直接这么写：

dt <- rbind(dt, NA)

如果原表有不同类型的列，rbind会自动处理类型兼容，和data.frame的行为保持一致。

要是你需要一次性添加多行空行，只需要调整索引范围或者重复NA的次数就行：

# 添加3行空行：索引赋值法
dt[(.N+1):(.N+3), ] <- NA

# 添加3行空行：rbind法
dt <- rbind(dt, as.data.table(matrix(NA, nrow=3, ncol=ncol(dt))))

内容的提问来源于stack exchange，提问作者Borax