diff options
| author | Johannes Ranke <jranke@uni-bremen.de> | 2014-06-27 20:20:56 +0200 |
|---|---|---|
| committer | Johannes Ranke <jranke@uni-bremen.de> | 2014-06-27 20:20:56 +0200 |
| commit | 79df7845e8d97af413c3b274ca3b31f0b4ca6ab0 (patch) | |
| tree | 571480bd74beb6104439cbf008063e3e6a4e7c75 /R | |
| parent | 59ce61be534c2e80704a8eb37973b66cc24f55b4 (diff) | |
Reorder endpoints in R/endpoints.R, update vignettes
Diffstat (limited to 'R')
| -rw-r--r-- | R/endpoints.R | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/R/endpoints.R b/R/endpoints.R index 0bd20ea7..a5bebd71 100644 --- a/R/endpoints.R +++ b/R/endpoints.R @@ -6,11 +6,11 @@ endpoints <- function(fit) { ep <- list()
obs_vars <- fit$obs_vars
parms.all <- fit$bparms.ode
+ ep$ff <- vector()
+ ep$SFORB <- vector()
ep$distimes <- data.frame(DT50 = rep(NA, length(obs_vars)),
DT90 = rep(NA, length(obs_vars)),
row.names = obs_vars)
- ep$ff <- vector()
- ep$SFORB <- vector()
for (obs_var in obs_vars) {
type = names(fit$mkinmod$map[[obs_var]])[1]
|