为什么riseOnHover不起作用？

Question

当我将鼠标悬停在标记上时，我试图在传单中绘制标记以弹出并显示其内容。我正在尝试的代码似乎不起作用。目的是将其整合到Shiny Web应用程序中。

m <- leaflet() %>% 
setView(lat = 51.50862, lng = -0.128069, zoom = 16) %>% 
addTiles() %>%
addMarkers(lng = c(-0.128369,-0.128169,-0.128500), lat = c(51.50862,51.50790,51.50962),
popup = 'c', options = markerOptions(clickable = TRUE, draggable = FALSE, 
keyboard = TRUE, title = "", alt = "", zIndexOffset = 0, opacity = 1, 
riseOnHover = TRUE, riseOffset = 250)) 
m 

有什么理由不行吗？任何建议/帮助将不胜感激。

威尔