tests/testthat/test-plot_manhattan.R

test_that("test plot_manhattan works", {
  skip_on_cran()
  expected <- otargen::manhattan(study_id = "GCST003044") %>% otargen::plot_manhattan()
  expect_s3_class(expected, "ggplot")
  expect_false(is.null(expected))
})

Try the otargen package in your browser

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

otargen documentation built on Sept. 30, 2024, 9:43 a.m.