tests/testthat/test-scatteR.R

test_that("scatteR catches Monotonic", {
  d <- scatteR(measurements = c("Monotonic" = 1),n_points = 25,init_points = 5)
  r <- scagnostics::scagnostics(d)
  print(r)
  expect_lte(abs(r["Monotonic"]-1.0),0.05)
})

Try the scatteR package in your browser

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

scatteR documentation built on Aug. 17, 2022, 9:05 a.m.