如何使用 allocate 来更改 R 数据框中的变量？

Question

我尝试做这样的事情：

x <- data.frame(1:20)  
attach(x)  
assign("x2",1:20,pos="x")  

但是，x$x2 给了我NULL。
使用 x2 我得到了我想要的，但它不是 data.frame 的一部分。

在这种简单的情况下手动将 x2 附加到 x 可以工作，但在我需要的更复杂的情况下则不行。我尝试在循环中分配分配，在该循环中循环分配调用中使用的变量名。

Answer 1

尝试使用内部：

x <- data.frame(x=1:20)
x <- within(x, {
  x2 <- x^2
  assign('x3', x2 * 2)
  # ... other assignments
})

不过使用 $ 和 [[ 更干净，这也使列排序正确：

x <- data.frame(x=1:20)
x$x2 <- x$x^2
x[['x3']] <- x$x2 * 2

Answer 2

?assign 的详细信息部分告诉您代码的行为方式为何。

为什么不做一些简单的事情，比如：

x["x2"] <- 1:20

Answer 3

分配变量等的方法有很多，哪种方法最好取决于个人喜好。然而，有几点：

您不想attach()任何东西。十有八九它都会工作得很好，然后在你意想不到的时候咬你屁股，因为你所做的就是将你的对象的副本放在搜索路径上。修改原始对象，搜索路径上的对象不会更改以匹配。

我个人不喜欢在一般使用中使用 $ 访问内容。它很丑陋，并且会导致用户倾向于钻研物体并随心所欲地撕掉东西。对于你的数据来说并不重要，但是当我看到人们在做model$residuals时我很担心。有更好的方法（在本例中为 resid()）。一些用户还用 $ 来猜测他们的模型公式。

如果您正在编写数据分析脚本，并且可能会在几个月或几年后回来，那么在我看来，任何可以帮助您理解代码正在做什么的东西都是无价的。我发现 with() 和 within() 对于您遇到的这类问题很有用，因为它们明确说明了您想要做什么。

这更清楚：

x <- data.frame(X = rnorm(10))
with(x, mean(X))
x <- within(x, Y <- rpois(10, 3))

比

x <- data.frame(X = rnorm(10))
mean(x$X)
x$Y <- rpois(10, 3)
## or
x["Y"] <- rpois(10, 3)

即使他们做同样的事情。

within() 调用中的 assign() 只是浪费打字，不是吗？