aboutsummaryrefslogtreecommitdiff
path: root/vignettes/FOCUS_D.Rmd
diff options
context:
space:
mode:
authorJohannes Ranke <jranke@uni-bremen.de>2016-11-02 16:19:50 +0100
committerJohannes Ranke <jranke@uni-bremen.de>2016-11-02 16:19:50 +0100
commitbad0c7caff62aa90225ae8acee43b297bdc28b25 (patch)
treec5ad100b2a0a2f0cdac4fe3b6fb665d38ba40387 /vignettes/FOCUS_D.Rmd
parent2409369d3a665f2b8e0b7333f4c2286a61614179 (diff)
parent0ce4dd40fc31b4297aa8f237b20c7f5daa46ea32 (diff)
Merge branch 'master' of ssh://jrwb.de/mkin into pkgdown
Conflicts: .Rbuildignore
Diffstat (limited to 'vignettes/FOCUS_D.Rmd')
-rw-r--r--vignettes/FOCUS_D.Rmd12
1 files changed, 6 insertions, 6 deletions
diff --git a/vignettes/FOCUS_D.Rmd b/vignettes/FOCUS_D.Rmd
index 4edc7bf2..57b2d9d6 100644
--- a/vignettes/FOCUS_D.Rmd
+++ b/vignettes/FOCUS_D.Rmd
@@ -10,7 +10,7 @@ output:
vignette: >
%\VignetteIndexEntry{Example evaluation of FOCUS Example Dataset D}
%\VignetteEngine{knitr::rmarkdown}
- \usepackage[utf8]{inputenc}
+ %\VignetteEncoding{UTF-8}
---
```{r, include = FALSE}
@@ -25,7 +25,7 @@ library we look a the data. We have observed concentrations in the column named
named `parent` and `m1`.
-```{r}
+```{r data}
library("mkin")
print(FOCUS_2006_D)
```
@@ -38,7 +38,7 @@ R code can be found in the character vector `$diffs` of the `mkinmod` object. If
a C compiler (gcc) is installed and functional, the differential equation model will
be compiled from auto-generated C code.
-```{r}
+```{r model}
SFO_SFO <- mkinmod(parent = mkinsub("SFO", "m1"), m1 = mkinsub("SFO"))
print(SFO_SFO$diffs)
```
@@ -46,21 +46,21 @@ print(SFO_SFO$diffs)
We do the fitting without progress report (`quiet = TRUE`).
-```{r}
+```{r fit}
fit <- mkinfit(SFO_SFO, FOCUS_2006_D, quiet = TRUE)
```
A plot of the fit including a residual plot for both observed variables is obtained
using the `plot` method for `mkinfit` objects.
-```{r, fig.height = 5}
+```{r plot, fig.height = 5}
plot(fit, show_residuals = TRUE)
```
Confidence intervals for the parameter estimates are obtained using the `mkinparplot` function.
-```{r, fig.height = 4}
+```{r plot_2, fig.height = 4}
mkinparplot(fit)
```

Contact - Imprint