Get rid of stringsAsFactors = TRUE effect in stored data

spatialanalysis · Oct 22, 2019 · b7db283 · b7db283
1 parent 5b8902e
commit b7db283
Show file tree

Hide file tree

Showing 16 changed files with 8 additions and 8 deletions.
diff --git a/data-raw/clean-clev.R b/data-raw/clean-clev.R
@@ -1,6 +1,6 @@
 library(sf)
 library(usethis)
 
-clev_pts <- st_read("data-raw/clev_sls_154_core.shp")
+clev_pts <- read_sf("data-raw/clev_sls_154_core.shp")
 
 usethis::use_data(clev_pts, overwrite = TRUE)
diff --git a/data-raw/clean-commareas.R b/data-raw/clean-commareas.R
@@ -1,6 +1,6 @@
 library(sf)
 library(usethis)
 
-chicago_comm <- st_read("data-raw/chicagocomm.shp")
+chicago_comm <- read_sf("data-raw/chicagocomm.shp")
 
 usethis::use_data(chicago_comm, overwrite = TRUE)
diff --git a/data-raw/clean-commpop.R b/data-raw/clean-commpop.R
@@ -1,6 +1,6 @@
 library(sf)
 library(usethis)
 
-commpop <- st_read("data-raw/commpop.shp")
+commpop <- read_sf("data-raw/commpop.shp")
 
 usethis::use_data(commpop, overwrite = TRUE)
diff --git a/data-raw/clean-guerry.R b/data-raw/clean-guerry.R
@@ -1,6 +1,6 @@
 library(sf)
 library(usethis)
 
-guerry <- st_read("data-raw/guerry.shp")
+guerry <- read_sf("data-raw/guerry.shp")
 
 usethis::use_data(guerry, overwrite = TRUE)
diff --git a/data-raw/clean-ncovr.R b/data-raw/clean-ncovr.R
@@ -1,6 +1,6 @@
 library(sf)
 library(usethis)
 
-ncovr <- st_read("data-raw/NAT.shp")
+ncovr <- read_sf("data-raw/NAT.shp")
 
 usethis::use_data(ncovr, overwrite = TRUE)
diff --git a/data-raw/clean-nyc-sf.R b/data-raw/clean-nyc-sf.R
@@ -1,7 +1,7 @@
 library(sf)
 library(usethis)
 
-nyc_sf <- st_read("data-raw/nyc.shp")
+nyc_sf <- read_sf("data-raw/nyc.shp")
 nyc_sf <- lwgeom::st_make_valid(nyc_sf)
 
 usethis::use_data(nyc_sf, overwrite = TRUE)
diff --git a/data-raw/clean-ohio-lung.R b/data-raw/clean-ohio-lung.R
@@ -1,6 +1,6 @@
 library(sf)
 library(usethis)
 
-ohio_lung <- st_read("data-raw/ohlung.geojson")
+ohio_lung <- read_sf("data-raw/ohlung.geojson")
 
 usethis::use_data(ohio_lung, overwrite = TRUE)
diff --git a/data-raw/clean-vehpts.R b/data-raw/clean-vehpts.R
@@ -1,6 +1,6 @@
 library(sf)
 library(usethis)
 
-vehicle_pts <- st_read("data-raw/cleanvehpts.shp")
+vehicle_pts <- read_sf("data-raw/cleanvehpts.shp")
 
 usethis::use_data(vehicle_pts, overwrite = TRUE)
diff --git a/data/chicago_comm.rda b/data/chicago_comm.rda
diff --git a/data/clev_pts.rda b/data/clev_pts.rda
diff --git a/data/commpop.rda b/data/commpop.rda
diff --git a/data/guerry.rda b/data/guerry.rda
diff --git a/data/ncovr.rda b/data/ncovr.rda
diff --git a/data/nyc_sf.rda b/data/nyc_sf.rda
diff --git a/data/ohio_lung.rda b/data/ohio_lung.rda
diff --git a/data/vehicle_pts.rda b/data/vehicle_pts.rda