diff options
author | jranke <jranke@edb9625f-4e0d-4859-8d74-9fd3b1da38cb> | 2013-10-22 12:45:33 +0000 |
---|---|---|
committer | jranke <jranke@edb9625f-4e0d-4859-8d74-9fd3b1da38cb> | 2013-10-22 12:45:33 +0000 |
commit | 1401ae0fcf4b402702da0ccaecffe106b3697fb9 (patch) | |
tree | 615c8dc79ed7f831a971addaba64c3cd5305b4b0 /man | |
parent | 43f04f8abd74c2498a1c54fe56d8fee60f670902 (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
Diffstat (limited to 'man')
-rw-r--r-- | man/mkinfit.Rd | 4 |
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 } |