r - 带有工具提示的ggvis密度图？

Question

我正在尝试将 tooltip 添加到我的 ggvis 图中。当我将鼠标悬停在密度图上时，我基本上想添加密度数。这是我现在拥有的:

mtcars %>% ggvis(~wt, fill := "red") %>% 
  layer_densities() %>%  
  add_axis("x", title = "Weight") %>% 
  scale_numeric("x", domain = c(0, 5), nice = FALSE, clamp = TRUE) %>% 
  add_tooltip(function(df){density(df$wt)})

但是当我悬停时，我得到这个错误:

Error in density.default(df$wt) : argument 'x' must be numeric

谢谢!

Answer 1

我只有部分答案，但它可能会帮助您朝着正确的方向前进。

下面的代码会给你一个工具提示:

mtcars %>% ggvis(~wt, fill:="red") %>%
  layer_densities() %>%  
  add_axis("x", title = "Weight") %>% 
  add_tooltip(function(data){data$resp_}, "hover")

但是，工具提示包含每个 x 值的相同值(即:密度曲线的第一个值)。

与 dens <- mtcars %>% compute_density(~wt)你会得到一个密度数据框。

希望其他人想改进这个答案以获得完整的解决方案..