r - 如何方便地在 session 之间移动对象

Question

在理想的工作流程中，这显然不是什么好建议，但有时它很有用。

可以轻松完成吗？

Answer 1

我实现了以下功能，它会在您的主文件夹中放置一个临时文件，并在默认情况下将其删除:

shoot <- function(..., list = character(), rm = FALSE){
  path <- file.path(path.expand("~"),"temp_object.RData")
  save(..., list =  list, file = path)
  if(rm) rm(list = c(list,as.character(substitute(alist(...))[-1])),
                envir = parent.frame())
  invisible(NULL)
}

loot <- function(rm = TRUE){
  path <- file.path(path.expand("~"),"temp_object.RData")
  if(file.exists(path)){
    load(path,envir = parent.frame())
    if(rm) file.remove(path)
  } else {
    stop("nothing to loot!")
  }
  invisible(NULL)
}

test <- "abcd"
shoot(test)
rm(test)
loot() # in practice from another session
test
# [1] "abcd"

如果一个 RStudio session 有错误并且我无法绘图，这对我来说很有用，所以我可以将它发送给另一个。

例如，只需简单更改默认路径即可在网络中轻松地在同事之间传递数据。

感谢@MrFlick 的建议