storageSummary(frame=sys.parent(), by.size=F, print.=T, print.zeros=F)
sys.parent().
T, table arenas by frame number and size,
otherwise just by frame number. By default,
F.
T.
F.
Report headers and arena used in various frames. Frames numbered 0 or with
positive numbers are evaluation frames. A frame numbered -1 is the session
frame. A frame numbered -2 is a special permanent frame. Other negative
frame numbers are for databases (in no particular order).
NULL
or
integer(0) means all frames.
tempFun1 <- function(nrow = 10, ncol = 1000) {
t(sapply(1:nrow, function(i, ncol) {
old <- storageSummary(NULL, print. = F)
junk <- rnorm(ncol)
new <- storageSummary(NULL, print. = F)
cat("Iteration: ", i, "\n")
print(cbind(Total = rowSums(new), Diff = rowSums(new - old)))
cat("\n")
junk
}, ncol = ncol))
invisible()
}
tempFun()