diff --git a/R/blackmarbler.R b/R/blackmarbler.R index a9aaafc..a06face 100644 --- a/R/blackmarbler.R +++ b/R/blackmarbler.R @@ -83,7 +83,8 @@ file_to_raster <- function(f, tile_i <- f %>% str_extract("h\\d{2}v\\d{2}") - bm_tiles_sf <- read_sf("https://raw.githubusercontent.com/worldbank/blackmarbler/main/data/blackmarbletiles.geojson") + #bm_tiles_sf <- read_sf("https://raw.githubusercontent.com/worldbank/blackmarbler/main/data/blackmarbletiles.geojson") + data("bm_tiles_sf") grid_i_sf <- bm_tiles_sf[bm_tiles_sf$TileID %in% tile_i,] grid_i_sf_box <- grid_i_sf %>% diff --git a/readme_figures/build_package.R b/readme_figures/build_package.R index e114d09..391d9a0 100644 --- a/readme_figures/build_package.R +++ b/readme_figures/build_package.R @@ -1,6 +1,8 @@ if(F){ setwd("~/Documents/Github/blackmarbler") + load("~/Documents/Github/blackmarbler/data/bm_tiles_sf.rda") + roxygen2::roxygenise("~/Documents/Github/blackmarbler") pkgdown::clean_site()