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
)

Comienza con el ejemplo de R proporcionado usando highlight(), add_markers(), leaflet(), addCircles() y bscols(). Lee el comportamiento existente de highlight de plotly y leaflet vinculados y, después, determina si el estado de hover puede sincronizar los colores de los marcadores en ambas vistas; se considera terminado cuando el punto sobre el que se pasa el cursor cambia de color en el diagrama de dispersión y en el mapa.