AMR/tests/testthat/test-p.symbol.R

mirror of https://github.com/msberends/AMR.git
context("p.symbol.R")

test_that("P symbol works", {
  expect_identical(p.symbol(c(0.001, 0.01, 0.05, 0.1, 1, NA, 3)),
                   c("***", "**", "*", ".", " ", NA, NA))
})
extra unit tests 2018-07-02 09:34:20 +02:00			`context("p.symbol.R")`

			`test_that("P symbol works", {`
addins and small improvements to microorganisms dataset 2018-07-04 17:20:03 +02:00			`expect_identical(p.symbol(c(0.001, 0.01, 0.05, 0.1, 1, NA, 3)),`
			`c("*", "", "*", ".", " ", NA, NA))`
extra unit tests 2018-07-02 09:34:20 +02:00			`})`