在静默中通过gc()释放内存

8

我正在Ubuntu中运行R代码,并希望释放一些内存。在我删除变量(rm())之后,我调用gc()。看起来它有效。但是如何让它在静默模式下工作(即不报告消息)。 我尝试设置gcinfo(verbose=FALSE),但gc()仍然报告消息。

gcinfo(verbose=FALSE)
# [1] FALSE
gc()
#             used  (Mb) gc trigger   (Mb)  max used   (Mb)
# Ncells    256641  13.8     467875   25.0    350000   18.7
# Vcells 103826620 792.2  287406824 2192.8 560264647 4274.5
3个回答

10

invisible()函数在这种情况下非常有用。你可以编写一个小的gc()包装器函数,该函数在没有任何参数的情况下以隐式的方式返回gc()

gcQuiet <- function(quiet = TRUE, ...) {
    if(quiet) invisible(gc()) else gc(...)
}

gcQuiet()        ## runs gc() invisibly

gcQuiet(FALSE)
#          used (Mb) gc trigger (Mb) max used (Mb)
# Ncells 283808 15.2     531268 28.4   407500 21.8
# Vcells 505412  3.9    1031040  7.9   896071  6.9

gcQuiet(FALSE, verbose=TRUE)
# Garbage collection 26 = 12+1+13 (level 2) ... 
# 15.2 Mbytes of cons cells used (53%)
# 3.9 Mbytes of vectors used (49%)
#          used (Mb) gc trigger (Mb) max used (Mb)
# Ncells 283813 15.2     531268 28.4   407500 21.8
# Vcells 505412  3.9    1031040  7.9   896071  6.9

0
我使用的快速而简单的方法是:
echo "gc()" > gc.R

你可以这样做:

source("gc.R", echo=FALSE)

0

一个更简单的方法是

#assign the output to a variable 
a <- gc()


网页内容由stack overflow 提供, 点击上面的
可以查看英文原文,
原文链接