aboutsummaryrefslogtreecommitdiff
path: root/man
diff options
context:
space:
mode:
Diffstat (limited to 'man')
-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