From ab93a4ea8f111949b6d99a79eae54bded86215dc Mon Sep 17 00:00:00 2001 From: Johannes Ranke Date: Fri, 26 Jun 2015 14:40:33 +0200 Subject: Fix x axis scaling in mkinparplot --- NEWS.md | 6 +++++- R/mkinparplot.R | 2 +- 2 files changed, 6 insertions(+), 2 deletions(-) diff --git a/NEWS.md b/NEWS.md index 8109ce7a..6a1c55b9 100644 --- a/NEWS.md +++ b/NEWS.md @@ -8,6 +8,10 @@ - New function `plot.mmkin()`: Plots single-row or single-column `mmkin` objects including residual plots. +### BUG FIXES + +- `mkinparplot()`: Fix the x axis scaling for rate constants and formation fractions that got confused by the introduction of the t-values of transformed parameters. + ## CHANGES in mkin VERSION 0.9-38 (2015-06-24) ### MINOR CHANGES @@ -18,7 +22,7 @@ ### BUG FIXES -- `mkinmod.R()`: When generating the C code for the derivatives, only declare the time variable when it is needed and remove the '-W-no-unused-variable' compiler flag as the C compiler used in the CRAN checks on Solaris does not know it. +- `mkinmod()`: When generating the C code for the derivatives, only declare the time variable when it is needed and remove the '-W-no-unused-variable' compiler flag as the C compiler used in the CRAN checks on Solaris does not know it. ## CHANGES in mkin VERSION 0.9-36 (2015-06-21) diff --git a/R/mkinparplot.R b/R/mkinparplot.R index a5e8fb89..0e8bdf5a 100644 --- a/R/mkinparplot.R +++ b/R/mkinparplot.R @@ -33,7 +33,7 @@ mkinparplot <- function(object) { layout(matrix(1:length(n.plot), ncol = 1), heights = n.plot + 1) s <- summary(object) - bpar <- data.frame(t(s$bpar)) + bpar <- data.frame(t(s$bpar[, c("Estimate", "Lower", "Upper")])) par(mar = c(2.1, 2.1, 0.1, 2.1)) par(cex = 1) for (type in names(n.plot)) { -- cgit v1.2.1