Gateway for fake_adaptive.R mock solver

Source: R/fake_solvers.R

A helper to create solver object encapsulating calls to fake_adaptive.R.

fake_adaptive_solver(nparams, nqoi, wd = tempdir(), ...)

Arguments

nparams

numeric scalar, number of parameters.
nqoi

numeric scalar, number of quantities of interest.
wd

character, working directory.
...

additional parameters passed to shell_solver().

Examples

s <- fake_adaptive_solver(3, 4)
run(s, c(-1, 5.2, 0), precision = 100)

#> Solver command: /Library/Frameworks/R.framework/Resources/bin/Rscript /Users/runner/work/_temp/Library/solvergater/exec/fake_adaptive.R 3 4 -1 5.2 0 100
#> Entering /var/folders/24/8k48jl6d249_n_qfxwsl6xvm0000gn/T//Rtmp2pZMh5
#> Solver exited normally
#> $qoi
#> [1]   4.2000  28.0400 139.6080 732.1616
#> 
#> $jacobian
#>      [,1]    [,2] [,3]
#> [1,]    1   1.000    1
#> [2,]   -2  10.400    0
#> [3,]    3  81.120    0
#> [4,]   -4 562.432    0
#>