Added scallops and clam data

NOAA-EDAB · Nov 30, 2023 · 6d5f9e3 · 6d5f9e3
1 parent 03a233f
commit 6d5f9e3
Show file tree

Hide file tree

Showing 3 changed files with 14 additions and 0 deletions.
diff --git a/data-raw/R/generic_scallop_clam_survey_pull.R b/data-raw/R/generic_scallop_clam_survey_pull.R
@@ -0,0 +1,14 @@
+#Generic survey data pull
+library(data.table); library(survdat); library(dbutils); library(here)
+
+#Pull Data----
+channel <- dbutils::connect_to_database(server="sole",uid="slucey")
+
+clams <- survdat::get_survdat_clam_data(channel)
+
+save(clams, file = here('data', 'survdatClams.RData'))
+
+scallops <- survdat::get_survdat_scallop_data(channel)
+
+save(scallops, file = here('data', 'survdatScallops.RData'))
+
diff --git a/data/survdatClams.RData b/data/survdatClams.RData
diff --git a/data/survdatScallops.RData b/data/survdatScallops.RData