tests/testthat/test_viterbi.R

context("viterbi")

test_that("Output has the right format",{
    m <- example$m
    expect_equal(length(viterbi(m)), nrow(m$data))
})

Try the moveHMM package in your browser

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

moveHMM documentation built on May 31, 2023, 6:13 p.m.