tests/testthat/test-WL.R

In javateak: Javanese Teak Above Ground Biomass Estimation

describe("WL()", {
  it("can estimate the leaf dry weight.", {
    expect_equal(WL(20), 12.55129)
    expect_equal(WL(0), 0)
  })
  it("return `NA` when the diameter at the lowest major living branch inputed is NA.", {
    expect_equal(WL(NA), NA)
  })
})