Functions for the simtimes slot of a simList object
and its elements. To maintain modularity, the behaviour of these functions depends
on where they are used. In other words, different modules can have their own
timeunit. SpaDES converts these to seconds when running a simulation, but
shows the user time in the units of the model as shown with timeunit(sim)
times(x, ...)
# S4 method for class 'simList'
times(x)
times(x) <- value
# S4 method for class 'simList'
times(x) <- value
# S3 method for class 'simList'
time(x, unit, ...)
time(x) <- value
# S4 method for class 'simList'
time(x) <- value
end(x, ...)
# S3 method for class 'simList'
end(x, unit, ...)
end(x) <- value
# S4 method for class 'simList'
end(x) <- value
start(x, ...)
# S3 method for class 'simList'
start(x, unit = NULL, ...)
start(x) <- value
# S4 method for class 'simList'
start(x) <- value
timeunit(x)
# S4 method for class 'simList'
timeunit(x)
timeunit(x) <- value
# S4 method for class 'simList'
timeunit(x) <- value
timeunits(x)
# S4 method for class 'simList'
timeunits(x)
elapsedTime(x, ...)
# S3 method for class 'simList'
elapsedTime(x, byEvent = TRUE, units = "auto", ...)A simList
Additional parameters.
A time, given as a numeric, optionally with a unit attribute, but this will be deduced from the model time units or module time units (if used within a module).
Character. One of the time units used in SpaDES.
Logical. If TRUE, the elapsed time will be by module and event;
FALSE will report only by module. Default is TRUE.
character string. Units in which the results are desired. Can be abbreviated.
Returns or sets the value of the slot from the simList object.
timeunit will extract the current units of the time used in a
simulation (i.e., within a spades call).
If it is set within a simInit, e.g.,
times=list(start=0, end=52, timeunit = "week"), it will set the
units for that simulation.
By default, a simInit call will use the smallest unit contained within
the metadata for the modules being used. If there are parent modules, then the
parent module timeunit will be used even if one of its children is a smaller timeunit.
If all modules, including parents, are set to NA, timeunit defaults to seconds.
If parents are set to NA, then the set of modules defined by that parent module
will be given the smallest units of the children.
Currently, available units are "second", "hours", day", "week", "month", and "year" can be used in the metadata of a module.
The user can also define a new unit. The unit name can be anything, but the
function definition must be of the form dunitName, e.g., dyear
or dfortnight.
The unit name is the part without the d and the function name definition
includes the d. This new function, e.g.,
dfortnight <- function(x) lubridate::duration(dday(14))
can be placed anywhere in the search path or in a module.
timeunits will extract the current units of the time of all
modules used in a simulation.
This is different from timeunit because it is not necessarily
associated with a spades call.
In many cases, the "simpler" use of each of these functions may be slower
computationally. For instance, it is much faster to use time(sim, "year")
than time(sim). So as a module developer, it is advantageous to
write out the longer one, minimizing the looking up that R must do.
These have default behaviour that is based on the calling frame timeunit. When used inside a module, then the time is in the units of the module. If used in an interactive mode, then the time will be in the units of the simulation.
Additional methods are provided to access the current, start, and end times of the simulation:
time | Current simulation time. |
start | Simulation start time. |
end | Simulation end time. |
timeunit | Simulation timeunit. |
timeunits | Module timeunits. |
times | List of all simulation times (current, start, end, timeunit). |
SpaDES.core-package, specifically the section 1.2.5 on Simulation times;
elapsedTime(),
Other functions to access elements of a 'simList' object:
.addDepends(),
checkpointFile(),
envir(),
events(),
globals(),
inputs(),
modules(),
objs(),
packages(),
params(),
paths(),
progressInterval()
# Elapsed Time
s1 <- simInit()
#> Setting:
#> options(
#> reproducible.cachePath = '/tmp/Rtmp45trFG/cache'
#> spades.inputPath = '/tmp/Rtmp45trFG/inputs'
#> spades.outputPath = '/tmp/Rtmp45trFG'
#> spades.modulePath = '/tmp/Rtmp45trFG/sampleModules'
#> spades.scratchPath = '/tmp/Rtmp45trFG/scratch'
#> )
#> Nov21 04:22:57 simInit Using setDTthreads(1). To change: 'options(spades.DTthreads = X)'.
#> Elpsed time for simInit: 0.05341601 secs
s2 <- spades(s1)
#> Nov21 04:22:57 simInit Using setDTthreads(1). To change: 'options(spades.DTthreads = X)'.
#> Nov21 04:22:57 chckpn:init total elpsd: 0.055 secs | 0 checkpoint init 0
#> Nov21 04:22:57 save :init total elpsd: 0.056 secs | 0 save init 0
#> Nov21 04:22:57 prgrss:init total elpsd: 0.058 secs | 0 progress init 0
#> Nov21 04:22:57 load :init total elpsd: 0.06 secs | 0 load init 0
#> simList saved in
#> SpaDES.core:::savedSimEnv()$.sim
#> It will be deleted at next spades() call.
elapsedTime(s2)
#> moduleName eventType elapsedTime
#> <char> <char> <difftime>
#> 1: checkpoint init 0 mins
#> 2: save init 0 mins
#> 3: progress init 0 mins
#> 4: load init 0 mins
elapsedTime(s2, units = "mins")
#> moduleName eventType elapsedTime
#> <char> <char> <difftime>
#> 1: checkpoint init 4.295905e-05 mins
#> 2: save init 3.029505e-05 mins
#> 3: progress init 2.960761e-05 mins
#> 4: load init 2.787511e-05 mins