Color markers upon hover linked leaflet map highlight()

I am wondering if there is a way to make the highlighted (from hover) dot change color, on both the linked leaflet map as well as the scatter plot? In other words, can the blue dot turn to a red dot, on both map and chart, upon hover?

Thanks!

library(leaflet)

eqs <- highlight_key(quakes)


p <- plot_ly(eqs, x = ~depth, y = ~mag) %>% 
  add_markers(alpha = 0.5) %>% 
  highlight("plotly_hover", opacityDim = .1)

map <- leaflet(eqs) %>% 
  addTiles() %>% 
  addCircles(opacity = 1)

bscols(
  widths = c(6, 6), 
  p, map
)

Bắt đầu với ví dụ R được cung cấp bằng cách sử dụng highlight(), add_markers(), leaflet(), addCircles() và bscols(). Đọc hành vi highlight hiện có của plotly và leaflet được liên kết, sau đó xác định liệu trạng thái hover có thể đồng bộ hóa màu của các marker trong cả hai chế độ xem hay không; hoàn thành khi điểm đang được hover đổi màu trên cả biểu đồ phân tán và bản đồ.