tests/testthat/test-Gamma_pH_3p.R

test_that("Cheking the model Gamma_pH_3p", {
  expect_equal(Gamma_pH_3p(7,2,7,2),2)
  expect_equal(Gamma_pH_3p(4,4,7,0.2),0)
  expect_equal(Gamma_pH_3p(5,3,7,1),0,75)
})
Ghayabh/predictive-microbiology documentation built on Nov. 14, 2020, 7:54 p.m.