add water type + speed up fetchATTAINS(); {arcgislayers}-ify fetchNHD

DESCRIPTION

@@ -68,15 +68,14 @@ Imports:
     urltools,
     geojsonsf,
     tibble,
-    rlang
-Remotes:
-    github::R-ArcGIS/arcgislayers,
-    github::R-ArcGIS/arcgis,
-    github::R-ArcGIS/arcpbf
+    rlang,
+    nhdplusTools,
+    arcgislayers,
+    httr,
+    jsonlite
 Depends: 
     R (>= 3.5.0)
 Suggests:
-    nhdplusTools, 
     lwgeom,
     DT,
     RColorBrewer,

R/RequiredCols.R

@@ -241,12 +241,17 @@ attains.cols <- c(
   "ATTAINS.isthreatened", "ATTAINS.state", "ATTAINS.on303dlist",
   "ATTAINS.organizationname", "ATTAINS.region", "ATTAINS.Shape_Length",
   "ATTAINS.reportingcycle", "ATTAINS.assmnt_joinkey", "ATTAINS.hastmdl",
-  "ATTAINS.orgtype", "ATTAINS.permid_joinkey", "ATTAINS.catchmentistribal",
+  "ATTAINS.orgtype", 
+  "ATTAINS.permid_joinkey", #  
+  "ATTAINS.catchmentistribal",
   "ATTAINS.ircategory", "ATTAINS.waterbodyreportlink", "ATTAINS.assessmentunitidentifier",
   "ATTAINS.overallstatus", "ATTAINS.isassessed", "ATTAINS.isimpaired",
   "ATTAINS.has4bplan", "ATTAINS.huc12", "ATTAINS.hasalternativeplan",
   "ATTAINS.visionpriority303d", "ATTAINS.areasqkm", "ATTAINS.catchmentareasqkm",
-  "ATTAINS.catchmentstatecode", "ATTAINS.catchmentresolution", "ATTAINS.Shape_Area"
+  "ATTAINS.catchmentstatecode", "ATTAINS.catchmentresolution", "ATTAINS.Shape_Area",
+  "ATTAINS.xwalk_method", 
+  "ATTAINS.xwalk_huc12_version", 
+  "ATTAINS.waterTypeCode"
 )
 
 # Only used in TADA Shiny or should be at the end