tests/testthat/test-single_data.R

#-----------code to test singen() function-------------#
test_that("singen('sample_data.csv', 'OD600', 0.3)", {
  expect_equal(singen("sample_data.csv", "OD600", 0.3), 43.54039)
})
rsteele7/590_final documentation built on May 28, 2019, 4:33 a.m.