tests/testthat/test-download_casen.R

In pachamaltese/casen: Metodos De Estimacion Con Disenio Probabilistico y Estratificado en Encuesta CASEN (Estimation Methods with Probabilistic Stratified Sampling in CASEN Survey)

context("testthat.R")

test_that("descargar_casen_* downloads dataset correctly", {
  # descargar_casen_mds(1990, tempdir())
  skip_on_cran()
  descargar_casen_github(1990, tempdir())
})

test_that("descargar_casen_* can't read non-existing file", {
  # expect_error(
  #   expect_warning(
  #   descargar_casen_mds(1813, tempdir()),
  #   "La encuesta CASEN"
  #   )
  # )
  expect_error(
    expect_warning(
    descargar_casen_github(1813, tempdir()),
    "La encuesta CASEN"
    )
  )
})