tests/testthat/test_discord_rra.R

test_that("find discord with RRA", {
  discords <- find_discords_rra(ecg0606, 100, 4, 4, "none", 0.01, 4)
  expect_true(discords[1,]$start < 420)
  expect_true(discords[1,]$end > 420)
})

Try the jmotif package in your browser

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

jmotif documentation built on March 26, 2020, 7:23 p.m.