tests/testthat/test-computeS.R

test_that("computeS works", {
    expect_error(computeS(1:5), "matrix")
    expect_equal(computeS(matrix(rep(1, 5), 5, 1)),
                 matrix(1/5, 5, 5))
})

Try the spconf package in your browser

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

spconf documentation built on Nov. 3, 2024, 5:06 p.m.