aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorjranke <jranke@edb9625f-4e0d-4859-8d74-9fd3b1da38cb>2013-10-22 12:45:33 +0000
committerjranke <jranke@edb9625f-4e0d-4859-8d74-9fd3b1da38cb>2013-10-22 12:45:33 +0000
commit1401ae0fcf4b402702da0ccaecffe106b3697fb9 (patch)
tree615c8dc79ed7f831a971addaba64c3cd5305b4b0
parent43f04f8abd74c2498a1c54fe56d8fee60f670902 (diff)
Commented out some of the mkinfit examples using \dontrun{} markup as they run a bit long
git-svn-id: svn+ssh://svn.r-forge.r-project.org/svnroot/kinfit/pkg/mkin@124 edb9625f-4e0d-4859-8d74-9fd3b1da38cb
-rw-r--r--man/mkinfit.Rd4
1 files changed, 3 insertions, 1 deletions
diff --git a/man/mkinfit.Rd b/man/mkinfit.Rd
index c15c0843..51e26ed5 100644
--- a/man/mkinfit.Rd
+++ b/man/mkinfit.Rd
@@ -187,7 +187,6 @@ fit.FOMC_SFO <- mkinfit(FOMC_SFO, FOCUS_2006_D)
fit.FOMC = mkinfit(FOMC, FOCUS_2006_D, plot=TRUE)
fit.FOMC_SFO <- mkinfit(FOMC_SFO, FOCUS_2006_D,
parms.ini = fit.FOMC$bparms.ode, plot=TRUE)
-}
# Use stepwise fitting, using optimised parameters from parent only fit, SFORB
SFORB <- mkinmod(parent = list(type = "SFORB"))
@@ -199,6 +198,7 @@ fit.SFORB_SFO <- mkinfit(SFORB_SFO, FOCUS_2006_D)
# Use starting parameters from parent only SFORB fit (not really needed in this case)
fit.SFORB = mkinfit(SFORB, FOCUS_2006_D)
fit.SFORB_SFO <- mkinfit(SFORB_SFO, FOCUS_2006_D, parms.ini = fit.SFORB$bparms.ode)
+}
# Weighted fits, including IRLS
SFO_SFO.ff <- mkinmod(parent = list(type = "SFO", to = "m1"),
@@ -213,6 +213,7 @@ f.w.mean.irls <- mkinfit(SFO_SFO.ff, FOCUS_2006_D, weight = "mean",
reweight.method = "obs")
summary(f.w.mean.irls)
+\dontrun{
# Manual weighting
dw <- FOCUS_2006_D
errors <- c(parent = 2, m1 = 1)
@@ -223,5 +224,6 @@ f.w.man.irls <- mkinfit(SFO_SFO.ff, dw, err = "err.man",
reweight.method = "obs")
summary(f.w.man.irls)
}
+}
\keyword{ models }
\keyword{ optimize }

Contact - Imprint