如何从R工作区中删除除一个以外的所有对象?

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

当前回答

下面是一个简单的构造，通过使用setdiff来实现:

rm(list=setdiff(ls(), "x"))

这是一个完整的例子。运行此程序的风险由你自己承担——它将删除除x之外的所有变量:

x <- 1
y <- 2
z <- 3
ls()
[1] "x" "y" "z"

rm(list=setdiff(ls(), "x"))

ls()
[1] "x"

其他回答

下面是一个简单的构造，通过使用setdiff来实现:

rm(list=setdiff(ls(), "x"))

这是一个完整的例子。运行此程序的风险由你自己承担——它将删除除x之外的所有变量:

x <- 1
y <- 2
z <- 3
ls()
[1] "x" "y" "z"

rm(list=setdiff(ls(), "x"))

ls()
[1] "x"

将v替换为要保留的对象的名称

rm(list=(ls()[ls()!="v"]))

hat-tip: http://r.789695.n4.nabble.com/Removing-objects-and-clearing-memory-tp3445763p3445865.html

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

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

要保留所有名称与模式匹配的对象，可以使用grep，如下所示:

to.remove <- ls()
to.remove <- c(to.remove[!grepl("^obj", to.remove)], "to.remove")
rm(list=to.remove)

# remove all objects but selected
rm(list = ls()[which("key_function" != ls())])

推荐文章