带工具提示的ggvis密度图？

Question

我正在尝试为我的ggvis图添加tooltip 。 当我将鼠标悬停在密度图上时，我基本上想要添加密度值。 这就是我现在所拥有的：

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)您将获得密度数据帧。

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