tests/testthat/test-is_ped_table.R

test_that("use", {
  expect_true(is_ped_table(get_test_ped_table()))
  expect_true(is_ped_table(ped_table = create_demo_ped_table()))
  expect_false(is_ped_table("nonsense"))
  expect_message(is_ped_table("nonsense", verbose = TRUE))
})
richelbilderbeek/plinkr documentation built on March 25, 2024, 3:18 p.m.