tests/testthat.R

library(testthat)
library(quantler)

test_check("quantler")

test_that('maxdrawdown returns a list of two elements',{
  expect_equal(length(maxdrawdown(runif(20))), 2)
})
purplezippo/quantler documentation built on May 15, 2019, 4:27 p.m.