Recursively, runs reproducible::objSize() on the simList environment, so it estimates the correct size of functions stored there (e.g., with their enclosing environments) plus, it adds all other "normal" elements of the simList, e.g., objSize(completed(sim)). The output is structured into 2 elements: the sim environment and all its objects, and the other slots in the simList (e.g., events, completed, modules, etc.). The returned object also has an attribute, "total", which shows the total size.

# S3 method for simList
objSize(x, quick = TRUE, ...)

Arguments

x

An object

quick

Logical. If FALSE, then an attribute, "objSize" will be added to the returned value, with each of the elements' object size returned also.

...

Additional arguments (currently unused), enables backwards compatible use.

Examples

a <- simInit(objects = list(d = 1:10, b = 2:20))
#> Setting:
#>   options(
#>     reproducible.cachePath = '/tmp/RtmpAzfvD1/myProject/cache'
#>     spades.inputPath = '/tmp/RtmpAzfvD1/myProject/inputs'
#>     spades.outputPath = '/tmp/RtmpAzfvD1/myProject/outputs'
#>     spades.modulePath = '/tmp/RtmpAzfvD1/myProject/modules'
#>     spades.scratchPath = '/tmp/RtmpAzfvD1/SpaDES/scratch'
#>   )
#> Using setDTthreads(1). To change: 'options(spades.DTthreads = X)'.
objSize(a)
#> 15.10 kB
utils::object.size(a)
#> 17184 bytes