向count_bars添加带有count的工具提示

Question

假设我有以下图表

library(ggvis)
mtcars%>% ggvis(~factor(cyl)) %>% layer_bars()

如何添加带有count变量的工具提示？

由于

Answer 1

这就是诀窍：

library(ggvis)
mtcars  %>% ggvis(~factor(cyl)) %>% layer_bars() %>%
  add_tooltip(function(df) (df$stack_upr_ - df$stack_lwr_))