diff options
| -rw-r--r-- | DESCRIPTION | 4 | ||||
| -rw-r--r-- | R/drfit.R | 5 | ||||
| -rw-r--r-- | data/IM1xVibrio.rda | bin | 10469 -> 9524 bytes | |||
| -rw-r--r-- | data/XY.rda | bin | 1602 -> 1602 bytes | |||
| -rw-r--r-- | man/IM1xVibrio.Rd | 4 | ||||
| -rw-r--r-- | man/XY.Rd | 3 |
6 files changed, 11 insertions, 5 deletions
diff --git a/DESCRIPTION b/DESCRIPTION index c744e02..7d0960b 100644 --- a/DESCRIPTION +++ b/DESCRIPTION @@ -1,6 +1,6 @@ Package: drfit -Version: 0.04-58 -Date: 2006-03-16 +Version: 0.04-59 +Date: 2006-03-28 Title: Dose-response data evaluation Author: Johannes Ranke <jranke@uni-bremen.de> Maintainer: Johannes Ranke <jranke@uni-bremen.de> @@ -330,6 +330,11 @@ drplot <- function(drresults, data, cat("will not be displayed\n") ctype = "none" } + } else { + if (ctype != "none") { + stop("There are no controls in the dataset, and therefore ", + "their scatter cannot be displayed\n") + } } lld <- log10(min(nonzerodata$dose)) lhd <- log10(max(nonzerodata$dose)) diff --git a/data/IM1xVibrio.rda b/data/IM1xVibrio.rda Binary files differindex d49d2c6..daef0b1 100644 --- a/data/IM1xVibrio.rda +++ b/data/IM1xVibrio.rda diff --git a/data/XY.rda b/data/XY.rda Binary files differindex 158285a..4b0d426 100644 --- a/data/XY.rda +++ b/data/XY.rda diff --git a/man/IM1xVibrio.Rd b/man/IM1xVibrio.Rd index 468fb67..79936d6 100644 --- a/man/IM1xVibrio.Rd +++ b/man/IM1xVibrio.Rd @@ -13,8 +13,8 @@ \usage{data(IM1xVibrio)} \format{ A dataframe containing the data as required for the \code{\link{drfit}} function. Additional - columns contain the name of the persons that generated the data - (\code{experimentator}) and a field specifying if the data is regarded valid + columns contain the species tested (luminescent bacteria Vibrio fischeri, \code{organism}), + and a field specifying if the data is regarded valid (\code{ok}). } \source{ @@ -3,7 +3,8 @@ \alias{XY} \title{Dose-Response data for two substances X and Y} \description{ - This is just a sample data set for two substances named X and Y. + This is just a sample Lemna growth rate data set for two substances + arbitrarily named X and Y. } \usage{data(antifoul)} \format{ |