aboutsummaryrefslogtreecommitdiff
path: root/man
diff options
context:
space:
mode:
authorJohannes Ranke <jranke@uni-bremen.de>2020-05-08 09:00:20 +0200
committerJohannes Ranke <jranke@uni-bremen.de>2020-05-08 09:00:20 +0200
commitf6f8ca5142020c2c5b0628bdcae1e2d00b80c6d5 (patch)
tree6cb3d93ed2303aca71403b8c7e7907d5a1e2c9b6 /man
parent09104e678154881762199b8ba19d7683fac9155f (diff)
Roxygenize, adapt tests
Diffstat (limited to 'man')
-rw-r--r--man/create_deg_func.Rd11
1 files changed, 10 insertions, 1 deletions
diff --git a/man/create_deg_func.Rd b/man/create_deg_func.Rd
index 2eefdb80..178661ff 100644
--- a/man/create_deg_func.Rd
+++ b/man/create_deg_func.Rd
@@ -22,5 +22,14 @@ Create degradation functions for known analytical solutions
SFO_SFO <- mkinmod(
parent = mkinsub("SFO", "m1"),
m1 = mkinsub("SFO"))
-fit <- mkinfit(SFO_SFO, FOCUS_2006_D, quiet = TRUE)
+FOCUS_D <- subset(FOCUS_2006_D, value != 0) # to avoid warnings
+fit_1 <- mkinfit(SFO_SFO, FOCUS_D, solution_type = "analytical", quiet = TRUE)
+fit_2 <- mkinfit(SFO_SFO, FOCUS_D, solution_type = "deSolve", quiet = TRUE)
+\dontrun{
+if (require(rbenchmark))
+ benchmark(
+ analytical = mkinfit(SFO_SFO, FOCUS_D, solution_type = "analytical", quiet = TRUE),
+ deSolve = mkinfit(SFO_SFO, FOCUS_D, solution_type = "deSolve", quiet = TRUE),
+ replications = 1)
+}
}

Contact - Imprint