Select marker by clicking on a map and update selected input

Hello all,
I was wondering is there a way to click on a marker on a Leaflet map in a shiny app to select an item, thus changing the item already selected in the dropdown menu. I click the station but in the "select a station" button, there is no change (figure below). Here you can find my code, I tried several options. Thank you for your time and help in advance. Here is my code:


geopackage_path <- "C:/Users/yagmur/work/Spain/data/"

year <- 2022
sf_data <- st_read(file.path(geopackage_path, paste0("meteo_andalucia_", year, ".gpkg")))

Select unique locations

unique_locations <- sf_data %>% distinct(station_name, .keep_all = TRUE)

ui <- fluidPage(
column(width = 4,
selectInput("station", "Select a Station", choices = unique_locations$station_name),
actionButton("compare", "Compare Temperature")
column(width = 8,

server <- function(input, output, session) {

Initialize the selected station as NULL

selected_station <- reactiveVal(NULL)

Render the leaflet map

output$map <- renderLeaflet({
leaflet(data = unique_locations) %>%
addTiles() %>%
addCircleMarkers(radius = 4,
color = "red",
fillOpacity = 0.8,
label = ~station_name,
group = "markers")

Update the selected station when a marker is clicked

observeEvent(input$map_marker_click, {
clicked_marker <- input$map_marker_click
clicked_station <- clicked_marker$label

updateSelectInput(session, "station", selected = clicked_station)


shinyApp(ui, server)