Leaflet sf shpfile

[LXH]

Hi everyone, first of all thanks for watching
Suppose I have some data, weekly data for each state in a certain country. I want to add a map in Rshiny , use polygons, similar to a heat map, and then I add an input. When I select a different week, the map is automatically presented as the data of that week. Do you have any packages that you can recommend? Thank you very much
I have a weekly.csv for a country per state, a shpfile for a country
I was using st_as_sf, st_intersects from sf package to convert the csv to geodata, then merge the data by taking the intersection, and finally use leaflet Drawing, but I think this method is very stupid, I want to discuss with you if there is a better way?
thanks

[williaml]

Have you got points or polygons? Filter your data, then join to the shapefile. It might help if you provide a reproducible example.

FAQ: How to do a minimal reproducible example ( reprex ) for beginners

A minimal reproducible example consists of the following items: A minimal dataset, necessary to reproduce the issue The minimal runnable code necessary to reproduce the issue, which can be run on the given dataset, and including the necessary information on the used packages. Let's quickly go over each one of these with examples: Minimal Dataset (Sample Data) You need to provide a data frame that is small enough to be (reasonably) pasted on a post, but big enough to reproduce your issue. Let's say, as an example, that you are working with the iris data frame head(iris) #> Sepal.Length Sepal.Width Petal.Length Petal.Width Species #> 1 5.1 3.5 1.4 0.…

[LXH]

ok, thank you very much. I'll try to make a reproducible example.
Thanks again!

[williaml]

You could do something like this perhaps?

Leaflet chorolpleth with reactive layer

I am trying to build a leaflet choropleth map from a reactive layer. I can make a plain one (same colours on the fill) , but can't get the choropleth to work. Any ideas on how to make it work? Warning: Error in pal: unused argument (AREA) library(shiny) library(sf) library(tidyverse) library(leaflet) # data in the sf package nc <- st_read(system.file("shape/nc.shp", package="sf")) %>% select(NAME, AREA, SID74) nc_names <- nc %>% st_set_geometry(NULL) %>% distinct(SID74) %>% arrange(SID74) %>% pull() # Define UI for application that draws a histogram ui <- fluidPage( # Generate a row with a sidebar sidebarLayout( # Define the sidebar w…