tests/testthat/test-get_sinim_var_name.R

context("test-sinimr.R")

test_that("get_sinim_var_name returns a valid output", {
  
  varname <- get_sinim_var_name("ingreso")
  
  expect_is(varname, "character")
})
robsalasco/sinimr documentation built on July 16, 2025, 3:55 p.m.