diff options
| author | Johannes Ranke <jranke@uni-bremen.de> | 2016-09-27 17:50:34 +0200 |
|---|---|---|
| committer | Johannes Ranke <jranke@uni-bremen.de> | 2016-09-27 17:50:34 +0200 |
| commit | 0d958ab6f84b569b5437f231c56004890c4ae23b (patch) | |
| tree | 263bf0f3df0671bffd7af643d7a9cdd45a1e9536 /pkg | |
| parent | 399383adcdb37c4a3e32f1a2133a2fa3663618d0 (diff) | |
Make the chents package optional
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]] |