tests/testthat/test_all_members.R

library(mnis)
context("all_members")


test_that("mnis_all_members returns expected format", {
  skip_on_cran()

  xmnisallmembers <- mnis_all_members(
    house = "all", party = NULL,
    tidy = TRUE, tidy_style = "snake_case"
  )
  expect_type(xmnisallmembers, "list")
  expect_true(tibble::is_tibble(xmnisallmembers))
})
EvanOdell/mnis documentation built on April 5, 2021, 7:37 a.m.