在包含NA的数据帧中添加虚拟行以增加数据帧的行数

Question

以下是我正在使用的代码：

for(i in 1:(max_length - nrow(dat2006))){
  datDummy[nrow(datDummy + i), ] <- NA
}

有人可以建议更好的方法

@akrun：示例

    df <- data.frame("var1" = c(1,2,3))
    df

原始数据框

var1
1    1
2    2
3    3

For循环（索引是一个问题，我想再添加5行）

for(i in 1:5){
          df[nrow(df) + i, ] <- NA
          }

输出

df
var1
1     1
2     2
3     3
4    NA
5    NA
6    NA
7    NA
8    NA
9    NA
10   NA
11   NA
12   NA
13   NA
14   NA
15   NA
16   NA
17   NA
18   NA

Answer 1

我能够使用以下代码实现我想要的目标：

row2007 <- as.integer(max_length - nrow(dat2007))
for(i in row2007){
  dat2007[(nrow(dat2007) + i), ] <- NA
}