tests/testthat/test_autocorrelation_test.R

library(PCRedux)

context("autocorrelation_test")

test_that("autocorrelation_test gives the correct dimensions and properties", {
  library(qpcR)
  res_ac_positive <- autocorrelation_test(testdat[, 2])
 
  expect_that(res_ac_positive, is_a("numeric"))
})

Try the PCRedux package in your browser

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

PCRedux documentation built on May 11, 2022, 5:18 p.m.