tests/testthat/test-do-variability-plot.R

In computational-metabolomics/qcrms: Creates quality control output from XCMS output

context("test-dorsdplot")

test_that("That violin plot of RSD values is created", {
  out <- do_variability_plot (list_object = testData$doRSD, plotTitle = "Test", 
    subtitle = "sub title", ylim=200)
  expect_true(is(out, "ggplot"))
})