aboutsummaryrefslogtreecommitdiff
path: root/R
diff options
context:
space:
mode:
Diffstat (limited to 'R')
-rw-r--r--R/plot.nlme.mmkin.R3
1 files changed, 2 insertions, 1 deletions
diff --git a/R/plot.nlme.mmkin.R b/R/plot.nlme.mmkin.R
index e41d5357..a27f0caa 100644
--- a/R/plot.nlme.mmkin.R
+++ b/R/plot.nlme.mmkin.R
@@ -65,7 +65,8 @@ plot.nlme.mmkin <- function(x, i = 1:ncol(x$mmkin_orig),
names(degparms_fixed) <- rownames(fit_1$fixed)
degparms_all <- cbind(as.matrix(degparms_optim),
matrix(rep(degparms_fixed, nrow(degparms_optim)),
- ncol = length(degparms_fixed), byrow = TRUE))
+ ncol = length(degparms_fixed),
+ nrow = nrow(degparms_optim), byrow = TRUE))
degparms_all_names <- c(degparms_optim_names, names(degparms_fixed))
colnames(degparms_all) <- degparms_all_names

Contact - Imprint