Request assistance with static map

[Cheafitz25]

https://github.com/STAT210-S23/Parsons_Paper_Register/blob/main/addresses_exploration/workers_database.qmd See line 80 for the commented out leaflet. This issue will be closed when @nicholasjhorton has pushed a quarto file and pdf of an example static map.

[nicholasjhorton]

or a reprex: here you go @LorraineOloo and @Cheafitz25

suppressPackageStartupMessages(library(tidyverse))
suppressPackageStartupMessages(library(mosaic))
suppressPackageStartupMessages(library(sf))
suppressPackageStartupMessages(library(ggspatial))
locations <- tibble(
  lng = c(-72.60885324421784, -72.59690708839962, -72.610583),
  lat = c(42.207205320691806, 42.2048726160808, 42.208699),
  place = c(
    "Lucy's residence in 1883, 236 Maple Street",
    "Lucy's residence in 1888-1890, rooms 5 Mosher",
    "Lucy's residence in 1869, Dwight Street")
  )
 ggplot(locations, aes(x = lng, y = lat)) + 
   annotation_map_tile(type = "osm", zoomin = 0) + 
   geom_spatial_point() +
   geom_spatial_label_repel(aes(label = place), box.padding = 1) +
   coord_sf(crs = 4326)
#> Assuming `crs = 4326` in stat_spatial_identity()
#> Assuming `crs = 4326` in stat_spatial_identity()
#> Loading required namespace: raster
#> Zoom: 17
#> Fetching 18 missing tiles
#>   |                                                                              |                                                                      |   0%  |                                                                              |====                                                                  |   6%  |                                                                              |========                                                              |  11%  |                                                                              |============                                                          |  17%  |                                                                              |================                                                      |  22%  |                                                                              |===================                                                   |  28%  |                                                                              |=======================                                               |  33%  |                                                                              |===========================                                           |  39%  |                                                                              |===============================                                       |  44%  |                                                                              |===================================                                   |  50%  |                                                                              |=======================================                               |  56%  |                                                                              |===========================================                           |  61%  |                                                                              |===============================================                       |  67%  |                                                                              |===================================================                   |  72%  |                                                                              |======================================================                |  78%  |                                                                              |==========================================================            |  83%  |                                                                              |==============================================================        |  89%  |                                                                              |==================================================================    |  94%  |                                                                              |======================================================================| 100%
#> ...complete!

^{Created on 2023-03-02 with reprex v2.0.2}

[nicholasjhorton]

I'm closing this issue because I believe that it provided what you needed. Please reopen if you have questions.