Question

我有一个与 R Shiny有关的问题。所以我希望有一个工具提示，当我将鼠标放在点上时，它可以显示数据点的具体信息。任何人都有想法如何做到这一点？

示例代码非常受欢迎。

Answer 1

我已经在Ramnath V的rCharts中看到了这个，在他的NYTimes图形示例中。 rCharts位于Shiny之上。您可以查看完全可重现的clearly described example here。

这段代码就是你所追求的：

require(rCharts)
p1 <- rPlot(SOG ~ yearID, data = team_data, type = 'point', 
  size = list(const = 2), color = list(const = '#888'), 
  tooltip="function(item){return item.SOG +'\n' + item.name + '\n' + item.yearID}"
)
p1$print('chart1')

请注意他如何使用Javascript函数作为rPlot.

工具提示的参数

另一个选项

您也可以尝试将元素包装在tags$div()

中

虽然不完全是你想要的，但在this related question中，Joe Cheng正是这样说的，但对于UI.R. （不同之处在于，在该示例中，工具提示是静态文本。）

假设您有sliderInput：

tags$div(title="this static text will show up in the tooltip",
    sliderInput(  # parameters here
    )
)

希望能帮助你前进。

Answer 2

您现在也可以使用包ggvis进行此操作。见http://ggvis.rstudio.com/

这是您在server.R中使用的代码类型：

library(ggvis)
df %>% ggvis(~x, ~y) %>% layer_points() %>% 
    add_tooltip(function(x) paste0(names(x), ": ", 
                format(x), collapse = "<br />"), "hover") %>%
    bind_shiny("plot_id")

然后在ui.R中，放置你使用的情节：

ggvisOutput("plot_id")

R工具提示数据点

2 个答案:

另一个选项