0
我正在构建一个闪亮的Web应用程序,我需要在将鼠标悬停在它们上方时显示情节点。我设法通过将我的数组的x,y和其他信息放置在一个固定的可拖动的absolutepane中来解决此问题。每次将鼠标悬停在指针附近的某个点上时,是否可以放置此面板?另外,如果鼠标没有悬停在任何点上,我该如何隐藏面板? 目前,面板可拖动,并提前使用此代码如何将光面板放在指针/鼠标附近?
ui <- shinyUI(fluidPage(
absolutePanel(fixed=TRUE, draggable = TRUE,
verbatimTextOutput("hover_info")
),
plotOutput("myplot",
hover = hoverOpts(id ="myplot_hover")
)
))
server <- shinyServer(function(input, output) {
output$myplot <- renderPlot({
ggplot(mtcars) + geom_point(aes(mpg,cyl))
})
output$hover_info <- renderPrint({
nearPoints(mtcars, input$myplot_hover,maxpoints=1)
})
})
shinyApp(ui, server)
由于在页面的顶部固定
哇,它像一个魅力。我需要研究你的代码,但我现在就会使用它。非常感谢,真是太棒了。 – user2694433