diff --git a/DESCRIPTION b/DESCRIPTION index 9ced8769cd5c69c4ea3cfeb097409368ab051c3d..e96c337ead365441b81c15da6d7b66ed8c69a0bc 100644 --- a/DESCRIPTION +++ b/DESCRIPTION @@ -1,8 +1,8 @@ Package: stressaddition Type: Package Title: Modeling Tri-Phasic Concentration-Response Relationships -Version: 2.1.0 -Date: 2020-02-25 +Version: 2.1.1 +Date: 2020-02-26 Authors@R: c(person("Sebastian", "Henz", role = c("aut", "cre"), diff --git a/NEWS.md b/NEWS.md index 012fd68e8f66b0d08fb57dc73bc41c32a2487e0a..53a54a443700e2e20e02e626d2ff04a53d7062e7 100644 --- a/NEWS.md +++ b/NEWS.md @@ -1,3 +1,7 @@ +# stressaddition 2.1.1 + +* Restore the default behaviour of `plot_effect()` to also show `effect_tox` and `effect_tox_env`. + # stressaddition 2.1.0 * The functions `plot_effect()` and `plot_stress()` gain a `which` argument that controls which curves are plotted. Consequently, the `show_LL5_model` argument of `plot_effect()` was removed. diff --git a/R/plot_effect.R b/R/plot_effect.R index 7fa995dd952e3042e9e0a95f07dde5bdaf64f19c..5af14e08bb118822362c61318616a0eae74662dc 100644 --- a/R/plot_effect.R +++ b/R/plot_effect.R @@ -11,9 +11,9 @@ plot_effect <- function(model, curve_names <- names(model$curves) valid_names <- curve_names[startsWith(curve_names, "effect")] if (is.null(which)) { - which <- c("effect_tox_sys") + which <- c("effect_tox", "effect_tox_sys") if (model$with_env) { - which <- c(which, "effect_tox_env_sys") + which <- c(which, "effect_tox_env", "effect_tox_env_sys") } } else if ("all" %in% which) { if (length(which) == 1) {