我有一个有很多对象的工作空间,我想删除所有的,但只有一个。理想情况下,我希望避免键入rm(obj。1、obj.2……obj.n)。是否有可能指示删除除这些对象之外的所有对象?


当前回答

这利用了ls()的模式选项,在这种情况下,你有很多具有相同模式的对象,而你不想保留:

> foo1 <- "junk"; foo2 <- "rubbish"; foo3 <- "trash"; x <- "gold"  
> ls()
[1] "foo1" "foo2" "foo3" "x"   
> # Let's check first what we want to remove
> ls(pattern = "foo")
[1] "foo1" "foo2" "foo3"
> rm(list = ls(pattern = "foo"))
> ls()
[1] "x"

其他回答

要保存对象列表,可以使用:

rm(list=setdiff(ls(), c("df1", "df2")))

我刚刚花了几个小时来寻找一个类似但略有不同的问题的答案——我需要能够删除R中的所有对象(包括函数),除了少数向量。

一种方法是:

rm(list=ls()[! ls() %in% c("a","c")])

我想保留的向量命名为a和c。

希望这能帮助寻找同样解决方案的人!

这利用了ls()的模式选项,在这种情况下,你有很多具有相同模式的对象,而你不想保留:

> foo1 <- "junk"; foo2 <- "rubbish"; foo3 <- "trash"; x <- "gold"  
> ls()
[1] "foo1" "foo2" "foo3" "x"   
> # Let's check first what we want to remove
> ls(pattern = "foo")
[1] "foo1" "foo2" "foo3"
> rm(list = ls(pattern = "foo"))
> ls()
[1] "x"

让我们换个角度思考,如果我们想移除一个基团呢? 试试这个,

 rm(list=ls()[grep("xxx",ls())]) 

我个人不喜欢屏幕上有太多的表格和变量,但我无法避免使用它们。所以我把临时的东西命名为“xxx”开头,这样我就可以在它不再使用后删除它们。

从函数内部,rm .GlobalEnv中除函数外的所有对象

initialize <- function(country.name) {

  if (length(setdiff(ls(pos = .GlobalEnv), "initialize")) > 0) {
    rm(list=setdiff(ls(pos = .GlobalEnv), "initialize"), pos = .GlobalEnv)
  }

}