Not sure why this should be a numeric

4ce7ac1f · Laura A DeCicco · 31619aa8 · 4ce7ac1f
Commit 4ce7ac1f authored Jul 05, 2021 by Laura A DeCicco
--- a/tests/testthat/tests_userFriendly_fxns.R
+++ b/tests/testthat/tests_userFriendly_fxns.R
@@ -206,7 +206,7 @@ test_that("readNWISuse tests", {
  testthat::skip_on_cran()
  dc <- readNWISuse(years=c(2000,2005,2010),stateCd = "DC", countyCd = NULL)
  expect_true(nrow(dc)==3)
-  expect_is(dc$state_cd, 'numeric')
+  expect_is(dc$state_cd, 'character')
  
  ohio <- readNWISuse(years=2005,stateCd="OH",countyCd="ALL")
  expect_true(nrow(ohio)==88)