Интерактивный выбор в ggplotly с помощью geom_hex () scatterplot
Я пытаюсь создать матрицу точечного графика с интерактивным выбором между элементами geom на отдельных графиках матрицы. Это работает, когда я имею дело с geom_points (внутри ggpairs ()). Когда пользователь выбирает точки на любом из 3 нижних левых отдельных графиков матрицы, он может видеть точки, выделенные на других графиках матрицы. Ниже приведен простой пример:
library(GGally)
library(ggplot2)
library(plotly)
dat = mtcars[,1:3]
p <- ggpairs(dat)
ggplotly(p)
Однако в моем случае я собираюсь использовать geom_hex вместо geom_points. Я надеюсь разработать способ, с помощью которого пользователь может выделить шестиугольник (и) в отдельной матрице и увидеть все шестиугольники в других отдельных матрицах, которые содержат хотя бы одно из наблюдений, составляющих этот исходный шестиугольник (и).
Я полагаю, что это может быть более сложным шагом, потому что шестиугольники представляют собой сводные данные, которые объединяют несколько наблюдений. Ниже мой прогресс в достижении этой цели:
my_fn <- function(data, mapping, ...){
p <- ggplot(data = data, mapping = mapping) + geom_hex(binwidth=3)
p
}
p <- ggpairs(dat, lower = list(continuous = my_fn))
ggplotly(p)
Когда я наводю курсор на отдельные шестиугольники, я получаю интерактивную информацию об их числе (которое мне нравится). Однако, когда я пытаюсь выбрать шестиугольник (и) в одной матрице, я не вижу соответствующих шестиугольников, которые содержат хотя бы одно наблюдение исходного шестиугольника.
Я относительно знаком с Шини и Р. Если вам известен метод, который я могу использовать для решения этой проблемы, пожалуйста, поделитесь!
=============== Информация о сеансе ===============
R version 3.3.2 (2016-10-31)
Platform: x86_64-apple-darwin13.4.0 (64-bit)
Running under: OS X Mavericks 10.9.5
locale:
[1] en_US.UTF-8/en_US.UTF-8/en_US.UTF-8/C/en_US.UTF-8/en_US.UTF-8
attached base packages:
[1] stats graphics grDevices utils datasets methods base
other attached packages:
[1] data.table_1.10.0 shiny_0.14.2 hexbin_1.27.1 plotly_4.5.6.9000
[5] ggplot2_2.2.0.9000 GGally_1.3.0
loaded via a namespace (and not attached):
[1] Rcpp_0.12.8 colourpicker_0.3 RColorBrewer_1.1-2 plyr_1.8.4
[5] prettyunits_1.0.2 base64enc_0.1-3 tools_3.3.2 progress_1.1.2
[9] digest_0.6.10 jsonlite_1.1 tibble_1.2 gtable_0.2.0
[13] viridisLite_0.1.3 lattice_0.20-34 DBI_0.5-1 crosstalk_0.3.1
[17] yaml_2.1.14 stringr_1.1.0 dplyr_0.5.0 httr_1.2.1
[21] htmlwidgets_0.8 grid_3.3.2 reshape_0.8.6 R6_2.2.0
[25] purrr_0.2.2 tidyr_0.6.0 reshape2_1.4.2 magrittr_1.5
[29] scales_0.4.1.9000 htmltools_0.3.5 assertthat_0.1 mime_0.5
[33] xtable_1.8-2 colorspace_1.3-2 httpuv_1.3.3 labeling_0.3
[37] stringi_1.1.2 miniUI_0.1.1 lazyeval_0.2.0 munsell_0.4.3