我可以使用粘贴来调用数据框中的元素吗？

Question

myfunc <- function(vname, X){
  X$R'vname' = 0
  X$R'vname' [X$Y'vname'>0.254] = 1
}

也就是说，如果我调用myfunc（12，X），则会发生以下情况

  X$R12 = 0
  X$R12 [X$Y12>0.254] = 1

我知道paste0（“R”，12）将返回R12，但我不知道如何使用它来调用X $ R12或X $ Y12

谢谢！

Answer 1

尝试：

myfunc <- function(vname, X){
  vname2 = paste('R', vname, sep="")
  vname3 =  paste('Y', vname, sep="")
  X[vname2] = 0
  X[vname2][X[[vname3]]>0.254] = 1
}

但是，为了记录，你可以做到

X $ R12＆lt; - X $ Y12＆gt; 0.254

这将给你一个TRUE / FALSE，与R stat模型中的1/0相同。