tests/testthat/test-create_profile.R

In CDCgov/Rnssp: A Signature R package for the National Syndromic Surveillance Program (NSSP)

context("test-create_profile")

test_that("create_profile() works!", {
  myProfile <- create_profile("", "")
  testthat::expect_type(myProfile, "environment")
  testthat::expect_s3_class(myProfile, "R6")
  testthat::expect_s3_class(myProfile, "NSSPCredentials")
  testthat::expect_type(NSSPContainer$new(), "environment")
})