tests/testthat/test_amMekko.R

testthat::context("amMekko")
library(pipeR)
data(data_mekko)

testthat::test_that("Simple example", {
  testthat::expect_silent({
    amMekko(x = "var1", y = "var2", data = data_mekko)
  })
})

testthat::test_that("Simple example", {
  testthat::expect_silent({
    amMekko(x = "var1", y = "var2", data = data_mekko, horiz = TRUE)
  })
})

testthat::test_that("Simple example", {
  testthat::expect_silent({
    amMekko(x = "var1", y = "var2", data = data_mekko, show_values = TRUE)
  })
})

Try the rAmCharts package in your browser

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

rAmCharts documentation built on Dec. 6, 2019, 5:11 p.m.