inst/ignore/sofa_listdbs.R

# tests for sofa_listbs fxn in sofa
context("sofa_listbs")

test_that("sofa_listbs returns the correct class", {
  expect_that(sofa_listdbs(), is_a("character"))
  expect_that(sofa_listdbs()[[1]], is_a("character"))
})

Try the sofa package in your browser

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

sofa documentation built on July 8, 2020, 6:53 p.m.