r - 遍历文件中的所有变量

Question

如何遍历文件中的所有变量？我在下面有一个示例代码。我的数据集被命名为 dt。

library(data.table)
dt <- data.table(df)

#Flagging each group of 1 and successive 2s uniquely
dt[,flag := 0]
dt[classobj == 1,flag := 1]
dt[,flag := cumsum(flag)]

如何使下面的代码集循环遍历所有变量？我得到了大约 500 多个变量，手动完成它太乏味了。

#Copying down the value of valtype = 1 to all other rows with the same flag
dt[,var1 := .SD[classobj  == 1, var1], by = "flag"]
dt[,var2 := .SD[classobj  == 1, var2], by = "flag"]
...
dt[,varN := .SD[classobj  == 1, varN], by = "flag"]

Answer 1

沿着这些思路的东西应该可以解决问题 -

dt[
  ,
  setdiff(colnames(dt),c("flag","classobj")) := 
    .SD[
      classobj  == 1, 
      !c("flag","classobj")
      ], 
  by = "flag"
  ]