Took out long running test.

tests/testthat/tests_general.R

@@ -31,14 +31,15 @@ test_that("General NWIS retrievals working", {
 
 test_that("General WQP retrievals working", {
   testthat::skip_on_cran()
+  # testthat::skip_on_cran()
   # Bring back when WQP is back
   nameToUse <- "pH"
   pHData <- readWQPdata(siteid="USGS-04024315",characteristicName=nameToUse)
   expect_is(pHData$ActivityStartDateTime, 'POSIXct')
   
-  pHDataExpanded2 <- readWQPdata(bBox=c(-90.1,42.9,-89.9,43.1),
-                                 characteristicName=nameToUse)
-  expect_is(pHDataExpanded2$ActivityStartDateTime, 'POSIXct')
+#   pHDataExpanded2 <- readWQPdata(bBox=c(-90.1,42.9,-89.9,43.1),
+#                                  characteristicName=nameToUse)
+#   expect_is(pHDataExpanded2$ActivityStartDateTime, 'POSIXct')
   
   startDate <- as.Date("2013-01-01")
   nutrientDaneCounty <- readWQPdata(countycode="US:55:025",startDate=startDate,