tests/testthat/test-non-standard-calls.R

context('non-standard EM')

u <- v <- t(NPpc[601:813])

test_that('Return-raw = TRUE works', {
    expect_is(LDS_reconstruction(NPannual, u, v, start.year = 1800, num.restarts = 2, return.raw = TRUE), "list")
})

Try the ldsr package in your browser

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

ldsr documentation built on May 4, 2020, 5:06 p.m.