tests/testthat/test-get_loans.R

context("get_loans")

test_that("get_loans works correctly", {
  ec <- get_loans()
  
  expect_true(is.data.frame(ec))
  expect_true(nrow(ec) > 0)
  
})
infoDemocracy/RinfoDemocracy documentation built on March 24, 2020, 11:36 a.m.