diff options
| author | Johannes Ranke <jranke@uni-bremen.de> | 2014-04-29 07:56:08 +0200 |
|---|---|---|
| committer | Johannes Ranke <jranke@uni-bremen.de> | 2014-04-29 07:56:08 +0200 |
| commit | 163df96dd583d5b2505b88f86d70c7c8c962a325 (patch) | |
| tree | ed42dd631c2d5977ee061af3da2a49876c4c3485 | |
| parent | de7de65fc97ae54c731b829c13d01fc065b0b15d (diff) | |
Fix y label in optional residual plot of plot.mkinfit
| -rw-r--r-- | R/plot.mkinfit.R | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/R/plot.mkinfit.R b/R/plot.mkinfit.R index 23eb30fa..386452f8 100644 --- a/R/plot.mkinfit.R +++ b/R/plot.mkinfit.R @@ -86,7 +86,7 @@ plot.mkinfit <- function(x, fit = x, plot(0, type="n", xlim = xlim, ylim = c(-1.2 * maxabs, 1.2 * maxabs), - xlab = xlab, ylab = ylab) + xlab = xlab, ylab = "Residuals") for(obs_var in obs_vars){ residuals_plot <- subset(fit$data, variable == obs_var, c("time", "residual")) points(residuals_plot, pch = pch_obs[obs_var], col = col_obs[obs_var]) |