closes #364

ipeaGIT · Jul 31, 2024 · 416b1be · 416b1be
1 parent eeb552d
commit 416b1be
Show file tree

Hide file tree

Showing 2 changed files with 19 additions and 12 deletions.
diff --git a/data_prep/R/census_tract_2022.R b/data_prep/R/census_tract_2022.R
@@ -1,7 +1,7 @@
 library(sf)
 library(data.table)
 library(dplyr)
-
+library(furrr)
 
 year <- 2022
 
@@ -82,7 +82,11 @@ temp_sf <- mutate(temp_sf, across(all_of(char_cols), as.character))
 
 # make all columns as character
 num_cols <- all_cols[all_cols %like% 'code_']
-temp_sf <- mutate(temp_sf, across(all_of(char_cols), as.numeric))
+temp_sf <- mutate(temp_sf, across(all_of(num_cols), as.numeric))
+
+# remove lagoa dos patos e mirim
+temp_sf <- subset(temp_sf, code_muni != 430000100000000)
+temp_sf <- subset(temp_sf, code_muni != 430000200000000)
 
 
 # Use UTF-8 encoding
@@ -94,12 +98,6 @@ gc()
 
 
 
-# remove lagoa dos patos e mirim
-temp_sf <- subset(temp_sf, code_muni != 430000100000000)
-temp_sf <- subset(temp_sf, code_muni != 430000200000000)
-
-
-
 
 # harmonize and save
 
@@ -132,10 +130,13 @@ all_states <- unique(temp_sf$code_state)
 # Apply function to save the data
 gc(reset = T)
 
-tictoc::tic()
-future::plan(strategy = 'multisession')
-furrr::future_map(.x=all_states, .f=save_state, .progress = T)
-tictoc::toc()
+# tictoc::tic()
+# future::plan(strategy = 'multisession')
+# furrr::future_map(.x=all_states,
+#                   .f=save_state,
+#                   .progress = T,
+#                   .options = furrr_options(seed=TRUE))
+# tictoc::toc()
 
 
 tictoc::tic()

diff --git a/r-package/prep_data/update_metadata_table.R b/r-package/prep_data/update_metadata_table.R
@@ -183,4 +183,10 @@ piggyback::pb_upload(to_go,
   #
 
 
+f <- list.files('//storage1/geobr/data_gpkg/census_tract/2022', full.names = T)
+piggyback::pb_upload(f,
+                     "ipeaGIT/geobr",
+                     "v1.7.0"
+                     #, .token = ttt
+                     )