# Load libraries
library(sf)
# Prepare data
data(quakes)
quakes_data <- quakes |>
sf::st_as_sf(coords = c("long", "lat"), crs = 4326)
# Create map and add fill layer
map() |>
add_text_layer(
id = "test_layer",
source = quakes_data
)
Run the code above in your browser using DataLab