init

Set initial values before starting the ODE solver

Set initial values before starting the ODE solver

init(object, ...)

init(object, ...) <- value

Arguments

object	a class object
...	additional parameters
value	a value to set

Details

Sets the tolerance like this: solver <- init(solver, dt) Not all super classes require an init method.

Sets the tolerance like this: init(solver) <- dt

Examples

# init method in Kepler.R
setMethod("init", "Kepler", function(object, initState, ...) {
    object@state <- initState
    object@odeSolver <- init(object@odeSolver, getStepSize(object@odeSolver))
    object@counter <- 0
    object
})
#> [1] "init"

# init method in LogisticApp.R
setMethod("init", "Logistic", function(object, initState, r, K, ...) {
    object@r <- r
    object@K <- K
    object@state <- initState
    object@odeSolver <- init(object@odeSolver, getStepSize(object@odeSolver))
    object@counter <- 0
    object
})
#> [1] "init"

# init method in Planet.R
setMethod("init", "Planet", function(object, initState, ...) {
    object@state <- object@odeSolver@ode@state <- initState
    # initialize providing the step size
    object@odeSolver <- init(object@odeSolver, getStepSize(object@odeSolver))
    object@rate <- object@odeSolver@ode@rate
    object@state <- object@odeSolver@ode@state
    object
})
#> [1] "init"