tests/testthat/test-utilMWRyscale.R

In massbays-tech/MassWateR: Quality Control and Analysis of Massachusetts Water Quality Data

test_that("log auto TRUE", {
  expect_true(utilMWRyscale(tst$accdat, param = 'E.coli'))
})

test_that("linear force FALSE", {
  expect_false(utilMWRyscale(tst$accdat, param = 'E.coli', yscl = 'linear'))
})

test_that("linear auto FALSE", {
  expect_false(utilMWRyscale(tst$accdat, param = 'DO'))
})

test_that("log force TRUE", {
  expect_true(utilMWRyscale(tst$accdat, param = 'DO', yscl = 'log'))
})