tests/testthat/test-relative_yield.R

test_that("input error", {
  expect_error(relative_yield())
  expect_error(relative_yield("green plant"))
  expect_error(relative_yield("wheat, winter"))
  })

test_that("test cases", {
  expect_equal(relative_yield("wheat, winter", 6),1.1764706)
})

Try the SoilManageR package in your browser

Any scripts or data that you put into this service are public.

SoilManageR documentation built on June 8, 2025, 9:36 p.m.