ツールチップのggvis（Rと光沢）

Question

RスタジオのGGVISに関する小さな問題があります。

カーソルを移動すると、何かをプロットして各ポイントの詳細を知りたいです。したがって、GGVISパッケージとadd_tooltip（）関数を使用しています。

しかし、以下のコードを実行すると、ポイントにカーソルを移動するとプロットは表示されますが、追加情報は表示されません。

さらに、私の実際のコードは少し複雑で、関数が私を多く助けてくれるので、別の関数（tooltip_test）を使いたいです。

library(ggvis)  
test <- data.frame(ID=1:10, TIME=1:10, COUNTS=rep(1:2,5), EXTRA=c("A", "B", "C", "D", "E", "F", "G", "H", "I", "J")) 
    tooltip_test <- function(x) { 
     if (is.null(x)) return(NULL) 
     if(is.null(x$ID)) return(NULL) 

     sub_test = test[test$ID == x$ID, ] 
     paste0("Category: ", sub_test$EXTRA) 
    } 

    test %>% 
     ggvis(x= ~TIME, y= ~COUNTS) %>% 
     layer_points() %>% 
     add_tooltip(tooltip_test, "hover") 

Answer 1

library(ggvis)  
    test <- data.frame(ID=1:10, TIME=1:10, COUNTS=rep(1:2,5), EXTRA=c("A", "B", "C", "D", "E", "F", "G", "H", "I", "J")) 
    tooltip_test <- function(x) { 
     if (is.null(x)) return(NULL) 
    paste0('Category: ', test$EXTRA[x$ID]) 
    } 

test %>% 
    ggvis(x= ~TIME, y= ~COUNTS, key := ~ID) %>% 
    layer_points() %>% 
    add_tooltip(tooltip_test, "hover") 

これはあなたのための十分なはずです、uがあなたの「ID」の変数を定義するためにggvis` `で` key`引数を使用するのを忘れ