ex_fekete: Elliptic Fekete Points, Mechanical Problem, Index 2 DAE

In deTestSet: Test Set for Differential Equations

Elliptic Fekete Points, Mechanical Problem, Index 2 DAE

Description

The fekete problem computes the elliptic Fekete points.

Usage

fekete (times = seq(0, 1e3, by = 10 ), yini = NULL, dyini = NULL, 
       parms=list(), printmescd = TRUE, method = mebdfi, 
       atol = 1e-6, rtol = 1e-6, maxsteps = 1e+05, ...) 

Arguments

yini	the initial (state) values for the DE system. If y has a name attribute, the names will be used to label the output matrix.
dyini	the initial derivatives of the state variables of the DE system.
times	time sequence for which output is wanted; the first value of times must be the initial time.
parms	list of parameters that overrule the default parameter values
method	the solver to use
rtol	relative error tolerance, either a scalar or a vector, one value for each y,
atol	absolute error tolerance, either a scalar or a vector, one value for each y.
printmescd	if TRUE the mixed error significant digits computed using the reference solution at time 0.1 are printed
maxsteps	maximal number of steps per output interval taken by the solver
...	additional arguments passed to the solver .

Details

There are no parameters

Value

A matrix of class deSolve with up to as many rows as elements in times and as many columns as elements in yini, plus an additional column (the first) for the time value.

There will be one row for each element in times unless the solver returns with an unrecoverable error. If yini has a names attribute, it will be used to label the columns of the output value.

Author(s)

Karline Soetaert <[e-mail]>

Francesca Mazzia <[e-mail]>

References

url : archimede.dm.uniba.it/~testset

Examples

out <- fekete()
plot(out, lwd = 2, which = 1:20)

# reference run compared with output at end of interval for first 7 components
out1 <- fekete(times = c(0, 1000))
max(abs(out1[nrow(out1),-1] - reference("fekete")))    

deTestSet documentation built on July 9, 2023, 6:10 p.m.