diff options
Diffstat (limited to 'pkg')
-rw-r--r-- | pkg/DESCRIPTION | 8 | ||||
-rw-r--r-- | pkg/R/endpoint.R | 3 |
2 files changed, 7 insertions, 4 deletions
diff --git a/pkg/DESCRIPTION b/pkg/DESCRIPTION index 0d7f5bc..f9de23c 100644 --- a/pkg/DESCRIPTION +++ b/pkg/DESCRIPTION @@ -1,8 +1,8 @@ Package: pfm Type: Package Title: Utilities for Pesticide Fate Modelling -Version: 0.3-7 -Date: 2016-07-30 +Version: 0.3-8 +Date: 2016-09-26 Authors@R: person("Johannes Ranke", email = "jranke@uni-bremen.de", role = c("aut", "cre", "cph")) Description: Utilities for simple calculations of predicted environmental @@ -13,11 +13,11 @@ Depends: mkin Imports: graphics, - chents, readr, methods Suggests: - testthat + testthat, + chents License: GPL LazyLoad: yes LazyData: yes diff --git a/pkg/R/endpoint.R b/pkg/R/endpoint.R index 68e47f7..314acd2 100644 --- a/pkg/R/endpoint.R +++ b/pkg/R/endpoint.R @@ -41,6 +41,9 @@ endpoint <- function(chent, raw = FALSE, signif = 3) { + if (!is(chent, "chent")) { + stop("Please supply a chent object as created using the package 'chents' available from jrwb.de") + } ep_list <- chent$chyaml[[medium]][[type]] if (!is.na(lab_field[1])) { ep_list <- ep_list[[lab_field]] |