建立结构以积累成果

Question

我读到，在迭代累积数据之前，最好创建一个适当大小的数据帧。该代码示例具有4个输出变量，但实际有10个变量。复制“ rep（NA，t_max）”十次看起来很重复，我想知道是否有更好的方法？

make_track <- function(t_max) {
  track <- data.frame(
    var1 = as.integer(rep(NA, t_max)), 
    var2 = as.double(rep(NA, t_max)), 
    var3 = as.integer(rep(NA, t_max)), 
    var4 = as.double(rep(NA, t_max)) 
  )
  return(track)
}
t_max <- 7
track <- make_track(t_max)
print(track)