tests/testthat/testADTestStat.R

test_that("AD Test Stat.",{

  # Success cases were/can be tested by comparing plots and confidence intervals.
  
  # Error - 1
  expect_error(val <- ADTestStat(1000, 100, 1.05))

  # Error - 2
  expect_error(val <- ADTestStat(1000, 100, -.95))
  
})

Try the Dowd package in your browser

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

Dowd documentation built on May 30, 2017, 1:30 a.m.