add fixed column range for read_importphyto

tbep-tech · Dec 3, 2024 · a93dafa · a93dafa
1 parent b1d4e8a
commit a93dafa
Show file tree

Hide file tree

Showing 2 changed files with 3 additions and 4 deletions.
diff --git a/DESCRIPTION b/DESCRIPTION
@@ -1,7 +1,7 @@
 Package: tbeptools
 Title: Data and Indicators for the Tampa Bay Estuary Program
-Version: 3.0.0.9005
-Date: 2024-11-21
+Version: 3.0.0.9006
+Date: 2024-12-03
 Authors@R: c(
     person(given = "Marcus",
       family = "Beck",

diff --git a/R/read_importphyto.R b/R/read_importphyto.R
@@ -36,8 +36,7 @@ read_importphyto <- function(xlsx, download_latest = FALSE, na = c('', 'NULL')){
   rawdat <- readxl::read_xlsx(xlsx, na = na, col_types = c("text", "text", "text", "text", "text", "text", "date", "text",
                                                            "text", "text", "text", "text", "text", "text", "text", "text",
                                                            "text", "text", "text", "text", "text", "text", "text", "text",
-                                                           "text", "text")
-  )
+                                                           "text", "text"), range = readxl::cell_cols('A:Z'))
 
   # format
   out <- read_formphyto(rawdat)