for循环中的滞后函数

Question

我想在csv文件的for循环中使用滞后函数来复制上面一行的某些属性。下面是我写的代码。

pa = rep(NA, 2000)
ss = rep(NA, 2000)

for (i in 1:1949) {
  ss[i] <- subset(csv, attribute1 = i)
  pa[i] <- lag(ss$attribute2, 1)
}

但它会返回错误代码，

  

hasTsp（x）中的错误：尝试在NULL上设置属性   要替换的项目数量不是替换长度的倍数

如何解决此问题？