Question

我有什么方法可以避免在R中对矩阵的就地修改进行复制修改？

我正在尝试将较小的矩阵复制到较大矩阵的切片中，如下所示。

library(data.table)
y <- matrix(c(11,21,31,12,22,32),nrow=3,ncol=2)
address(y)
[1] "08429190"

y[2:3,] <- matrix(c(1,1,8,12),nrow=2)
address(y)
[1] "0E033D28"

Answer 1

我使用在Windows 8.1上运行RStudio 0.99.441并使用pryr::address的R 3.2.0获得与OP相同的行为。问题是RStudio的环境窗格引用了y。通常情况下，Hadley Wickham有一些很好的文档。

除了不使用RStudio之外，我认为除了使用RStudio之外，还有任何解决方案可以解决这个问题。我尝试了其他几件事。函数中的矩阵很好：

library("pryr")
fn <- function() {
  y <- matrix(c(11,21,31,12,22,32),nrow=3,ncol=2)
  print(address(y))
  y[2:3,] <- matrix(c(1,1,8,12),nrow=2)
  print(address(y))
}

调用fn()应显示地址未更改。

但是，将y创建为全局环境中的列表或环境的成员并不会阻止写入时的副本（例如x <- new.env(); x$y <- matrix(...)）。

根据Is there any way to disable environment pane in RStudio?，似乎没有任何方法可以禁用环境窗格。

data.table仍设法避免无意中复制。尝试：

library("data.table")
x <- as.data.table(matrix(c(11,21,31,12,22,32),nrow=3,ncol=2))
address(x)
x[2:3, `:=`(V1 = c(1, 1), V2 = c(8, 12))]
address(x)
x[, V3 := V1 + V2]
address(x)

在R中修改矩阵

1 个答案: