tests/testthat/test-comerciobr_grafico_corrente.R

test_that("grafico corrente funciona", {

  grafico <- barao::comerciobr_grafico_corrente("Argentina", "anual")
  expect_type(grafico, "list")
  expect_s3_class(grafico, "ggplot")

})
fernandobastosneto/barao documentation built on April 8, 2021, 9:11 a.m.