aboutsummaryrefslogtreecommitdiff
path: root/R
diff options
context:
space:
mode:
authorJohannes Ranke <jranke@uni-bremen.de>2015-06-26 14:40:33 +0200
committerJohannes Ranke <jranke@uni-bremen.de>2015-06-26 14:40:33 +0200
commitab93a4ea8f111949b6d99a79eae54bded86215dc (patch)
tree971728f37ad3ed94b8427a64c8ea0127b719f4fb /R
parentd9f884d10894ec4895e3928f50dc625575cc5191 (diff)
Fix x axis scaling in mkinparplot
Diffstat (limited to 'R')
-rw-r--r--R/mkinparplot.R2
1 files changed, 1 insertions, 1 deletions
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)) {

Contact - Imprint