tests/testthat/test-mrl.R

context("mrl")

test_that("mrl behaves as it should", {
  skip_on_cran()
  skip_on_travis()
    par(mfrow=c(1,1))
  res <- mrl(rain)
  res <- plot(res, , main="Figure 4.1 of Coles (2001)")
  expect_that(res, equals(NULL), label="mrlPlot:checkexecution")
}
)

Try the texmex package in your browser

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

texmex documentation built on May 2, 2019, 5:41 a.m.