tests/testthat/test-earlier-functions.R

context("test-earlier-functions.R")

test_that("original function runs",{
  expect_is(EDM_pred_E_2(dplyr::select(Nx_lags_orig,
                                       -c("t", "my.pred"))),
            "list")
})
luke-a-rogers/pbsEDM documentation built on June 4, 2024, 3:10 a.m.