tests/testthat/test-gc_heatmap.R

context("gc_heatmap")

library(testthat)
data("aligned_peak_data")
x <- aligned_peak_data
out <- gc_heatmap(x)

test_that("output is correct", {
    expect_equal(length(out[["data"]][["substance"]]), 22796)

})

Try the GCalignR package in your browser

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

GCalignR documentation built on Feb. 16, 2023, 5:23 p.m.