【发布时间】:2014-11-13 01:48:57
【问题描述】:
我有一个新手问题: 我删除了全局列表中的一个元素,但我使用了一个 return() 函数。我看到我的另一个元素仍然在他的地址(使用检查),但操作后的对象没有相同的 tracemem。 也许我不理解 tracemem 但在我删除之后,我是否移动或复制了一些东西?! 我想将一些操作与列表对象中的大数据并行化,当我完成释放内存时删除变量,所以我想确保我使用的是同一个对象。
谢谢。
参考资料:How can I remove an element from a list?
# WHEN YOU HAVE BIG DATA, after a process you want to free some memory of your
# object by remove a variable data
# E.G open a *.mat file with structured style -> list
#
# Try with big data and wait a while (your computer) to know
# object_size and mem_used()
#
#------------------------------------------------------------
#With Global Variable
x <- list('a'=123456789,'b'='highlander')
names(x)
paste(length(x),object_size(x),mem_used(),tracemem(x))
.Internal(inspect(x))
# Remove data
x['a'] <- NULL
names(x)
paste(length(x),object_size(x),mem_used(),tracemem(x))
.Internal(inspect(x))
#------------------------------------------------------------
# with function 1 - NOT WORKED
# FREE MEMORY
freeMemoryFromStructuredList1 <- function(x,select){
paste(length(x),object_size(x),mem_used(),tracemem(x))
x[select]<- NULL
}
#With Function 1
x <- list('a'=123456789,'b'='highlander')
names(x)
paste(length(x),object_size(x),mem_used(),tracemem(x))
.Internal(inspect(x))
# TRy to Remove data
freeMemoryFromStructuredList1(x,'a')
names(x)
paste(length(x),object_size(x),mem_used(),tracemem(x))
.Internal(inspect(x))
#------------------------------------------------------------
#With Function 2 (return) - WORK, Highlander at the same Address,
# but tracemem NOT
# FREE MEMORY
freeMemoryFromStructuredList2 <- function(x,select){
paste(length(x),object_size(x),mem_used(),tracemem(x))
x[select]<- NULL
return( x )
}
x <- list('a'=123456789,'b'='highlander')
names(x)
paste(length(x),object_size(x),mem_used(),tracemem(x))
.Internal(inspect(x))
# Remove data
x <-freeMemoryFromStructuredList2(x,'a')
names(x)
paste(length(x),object_size(x),mem_used(),tracemem(x))
.Internal(inspect(x))
【问题讨论】:
标签: r list parallel-processing