This method returns the current simulation time.
Examples
# set the seed of the random number generator
set.seed(0)
# create a simulation
sim <- SpatialSimulation()
sim$add_mutant(name = "A",
epigenetic_rates = c("+-" = 0.01, "-+" = 0.01),
growth_rates = c("+" = 0.2, "-" = 0.08),
death_rates = c("+" = 0.1, "-" = 0.01))
sim$place_cell("A+", 500, 500)
sim$run_up_to_event("switch", "A+", 100)
#>
[████████████████████████████████████████] 100% [00m:00s] Saving snapshot
# get the simulated time
sim$get_clock()
#> [1] 109.6863