tests/testthat/test-status.R

test_that("status check works", {

  skip_on_cran()
  skip_on_travis()
  skip_on_appveyor()

  x <- get_api_status()

  expect_equal(class(x), "list")
  expect_equal(class(x$account_id), "numeric")
})

Try the currencyapi package in your browser

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

currencyapi documentation built on May 31, 2023, 8:56 p.m.