tests/testthat/test-get_budgetary_exp_by_pop_range.R

test_that("Get government budget expenses for municipalities by population rank", {
  expect_gt(NROW(get_budgetary_exp_by_pop_range(pop_range=c(1,100), pop_year=2018, exp_year = 2019, account = "Pessoal e Encargos Sociais", expense_stage= "Despesas Empenhadas" )),0)

})
tchiluanda/siconfiBD documentation built on Oct. 2, 2022, 10:09 p.m.