tests/testthat/test-select_country.R

test_that("select_country", {
  testthat::expect_equal(select_country(jhu_covid19_data),
  shiny::selectizeInput("countryInput", "Which country do you want to display?",
                 choices = unique(jhu_covid19_data$country),
                 selected="Afghanistan", multiple =FALSE)
  )
})
etc5523-2020/r-package-assessment-yezihe-0063 documentation built on Jan. 1, 2021, 1:13 a.m.