tests/testthat/test_ChartScrollbar_setters.R

context("ChartScrollbar setters (class unions)")

testthat::test_that("setGraph method", {
  testthat::expect_message(setGraph(.Object = chartScrollbar()))
  testthat::expect_error(setGraph(.Object = chartScrollbar(), graph = rep("a", 3)))
})

Try the rAmCharts package in your browser

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

rAmCharts documentation built on Sept. 30, 2022, 5:06 p.m.