diff options
Diffstat (limited to 'tests/testthat/test_set_nd.R')
| -rw-r--r-- | tests/testthat/test_set_nd.R | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/tests/testthat/test_set_nd.R b/tests/testthat/test_set_nd.R index 29087a8..6b73e2d 100644 --- a/tests/testthat/test_set_nd.R +++ b/tests/testthat/test_set_nd.R @@ -17,6 +17,8 @@ test_that("Simple residue series processed as intended", { expect_equal(set_nd(metabolite, 0.02, loq = 0.05), c(NA, NA, .01, .03, .06, .1, .11, .1, .09, .05, .03, .01, NA)) + expect_equal(set_nd(c("nd", 1, 0.2, "nd"), 0.1), c(NA, 1, 0.2, 0.05)) + }) test_that("Simple residue series are processed as in the FOCUS guidance", { |