tests/testthat/test-ldpair.R

context("test-ldpair")

test_that("ldpair throws an error", {
  skip_on_cran()
  expect_error(LDpair("rs456", "YRI", token = Sys.getenv("LDLINK_TOKEN")))
})

test_that("ldpair works", {
  skip_on_cran()
  expect_named(LDpair(var1 = "rs3", var2 = "rs4", pop = "YRI", token = Sys.getenv("LDLINK_TOKEN")))
})
CBIIT/LDlinkR documentation built on March 4, 2020, 11:11 a.m.