aboutsummaryrefslogtreecommitdiff
path: root/man/confint.mkinfit.Rd
diff options
context:
space:
mode:
authorJohannes Ranke <jranke@uni-bremen.de>2019-10-29 10:12:12 +0100
committerJohannes Ranke <jranke@uni-bremen.de>2019-10-29 10:12:12 +0100
commit5e4ea59a41e00b05ea6664c08c7922e892e8ab77 (patch)
treee050dee7ff9ab7baac53d551d659227806dbe8ae /man/confint.mkinfit.Rd
parent900790b4139dd672c7383a3ed6ad2c1e51d855b9 (diff)
Return single parameters correctly from confint
Static documentation rebuilt by pkgdown
Diffstat (limited to 'man/confint.mkinfit.Rd')
-rw-r--r--man/confint.mkinfit.Rd20
1 files changed, 11 insertions, 9 deletions
diff --git a/man/confint.mkinfit.Rd b/man/confint.mkinfit.Rd
index 99f5875c..bad73407 100644
--- a/man/confint.mkinfit.Rd
+++ b/man/confint.mkinfit.Rd
@@ -112,15 +112,17 @@ rel_diffs_untransformed_ff <- abs((ci_quadratic_untransformed_ff - ci_profile_ff
rel_diffs_transformed_ff
rel_diffs_untransformed_ff
-# The profiling for the following fit does not finish in a reasonable time
-#m_synth_DFOP_par <- mkinmod(parent = mkinsub("DFOP", c("M1", "M2")),
-# M1 = mkinsub("SFO"),
-# M2 = mkinsub("SFO"),
-# use_of_ff = "max", quiet = TRUE)
-#DFOP_par_c <- synthetic_data_for_UBA_2014[[12]]$data
-#f_tc_2 <- mkinfit(m_synth_DFOP_par, DFOP_par_c, error_model = "tc",
-# error_model_algorithm = "direct", quiet = TRUE)
-#confint(f_tc_2, "parent_0")
+# The profiling for the following fit does not finish in a reasonable time,
+# therefore we use the quadratic approximation
+m_synth_DFOP_par <- mkinmod(parent = mkinsub("DFOP", c("M1", "M2")),
+ M1 = mkinsub("SFO"),
+ M2 = mkinsub("SFO"),
+ use_of_ff = "max", quiet = TRUE)
+DFOP_par_c <- synthetic_data_for_UBA_2014[[12]]$data
+f_tc_2 <- mkinfit(m_synth_DFOP_par, DFOP_par_c, error_model = "tc",
+ error_model_algorithm = "direct", quiet = TRUE)
+confint(f_tc_2, method = "quadratic")
+confint(f_tc_2, "parent_0", method = "quadratic")
}
}
\references{

Contact - Imprint