propagate_1step_D | R Documentation |
propagate_1step_D(model = "t06_f", N, state, par, told, tnew, icalclyap = as.integer(0), ds = 0, lyap = 0, deltat = 0.003, Astro = NULL)
model |
|
N |
|
state |
|
par |
|
told |
|
tnew |
|
icalclyap |
|
ds |
|
lyap |
|
deltat |
|
Astro |
##---- Should be DIRECTLY executable !! ----
##-- ==> Define data, use random,
##-- or do help(data=index) for the standard data sets.
## The function is currently defined as
function (model = "t06_f", N, state, par, told, tnew, icalclyap = as.integer(0),
ds = 0, lyap = 0, deltat = 0.003, Astro = NULL)
{
Ns <- size_npar_nrow(N, state, par)
if (is.vector(par))
par <- matrix(par, Ns$N, length(par), byrow = TRUE)
func <- getNativeSymbolInfo(model$func)$addr
.Call("c_propagate_d", func, Ns, state, par, told, tnew,
icalclyap, ds, lyap, Astro, deltat)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.