diff options
Diffstat (limited to 'R/checksubstance.R')
| -rw-r--r-- | R/checksubstance.R | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/R/checksubstance.R b/R/checksubstance.R index 06cc635..f22d4e2 100644 --- a/R/checksubstance.R +++ b/R/checksubstance.R @@ -70,7 +70,7 @@ checksubstance <- function(substance, db = "cytotox", experimentator = "%", plot(log10(data$conc),data[[responsename]], xlim=c(-2.5, 4.5), - ylim= c(-0.1, 2), + ylim= range(data[[responsename]], na.rm = TRUE), xlab=paste("decadic logarithm of the concentration in ",levels(data$unit)), ylab=responsename) |