tests/testthat/test-mixARnoise_sim.R

test_that("mixARnoise_sim works", {
    ## from Examples

    set.seed = 1234
    z <- sample(2, size = 5, replace = TRUE)
    mixARnoise_sim(list(rnorm, function(n) rt(n, 5)), z)
})

Try the mixAR package in your browser

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

mixAR documentation built on May 3, 2022, 5:08 p.m.