tests/testthat/test_corr.R

library(BSS)

test_that("power correlation is one at zero lag", {

  expect_equal(powerKernelCorrelation(-0.1, -1, 0), 1)

})

test_that("gamma correlation is one at zero lag", {

  expect_equal(gammaKernelCorrelation(-0.1, 1, 0), 1)

})
phillipmurray/BSS documentation built on June 29, 2020, 11:34 a.m.