マウスオーバーを外れ値に追加しますが、他のポイントは追加しませんか？

Question

highcharterパッケージを使用して大規模な散布図をプロットしたいのですが、いくつかの外れ値にマウスを合わせるだけです。あるシリーズでmouseTrackingを有効にする方法はありますか？

df <- data.frame(x = rnorm(1000), y = rnorm(1000)) 
df$sig <- ifelse(abs(df$x) > 2, "signif", "not") 

library(highcharter) 
hc <- highchart() %>% 
    hc_add_series_df(df, type = "scatter", group=sig) 

今私はすべてのポイントをマウスでオーバー無効にすることができますが、​​はシリーズのアレイを使用してについて何かを言いますか？

Answer 1

好きなことをする方法はたくさんあります。

私は最も単純な使用であると思う：

hchart(df, "scatter", hcaes(x, y, group = sig), enableMouseTracking = c(FALSE, TRUE)) 

（これはhighcharterの開発版であることに注意してください。）と同じである

：

highchart() %>% 
    hc_add_series(data = df %>% filter(sig == "not"), type = "scatter", enableMouseTracking = FALSE) %>% 
    hc_add_series(data = df %>% filter(sig == "signif"), type = "scatter", enableMouseTracking = TRUE) 

それとも

highchart() %>% 
    hc_add_series(data = list_parse(df %>% filter(sig == "not")), type = "scatter", enableMouseTracking = FALSE) %>% 
    hc_add_series(data = list_parse(df %>% filter(sig == "signif")), type = "scatter", enableMouseTracking = TRUE)