如何解决当1个子图是一个聚合图时，我无法进行笔刷/链接以处理串扰并为2个子图作图
我无法为自己的一生弄清楚为什么我不能为下面的两个图（p1，p2）进行刷涂。
我期望的是：如果单击左侧条形图中的特定菱形切割，则相应的切割应在散点图中突出显示。
brushing / linking NOT working
以下可复制的示例
library(crosstalk);library(tidyverse);library(plotly)
d = ggplot2::diamonds %>% slice_sample(prop = 0.01)
m <- d %>% highlight_key(~cut)
#m = crosstalk::SharedData$new(d,key = ~cut)
p1 = m$data() %>% count(cut) %>% plot_ly() %>% add_bars(x = ~cut,y = ~n,color =~cut)
p2 = m %>% plot_ly() %>% add_markers(x = ~carat,y = ~price,color = ~cut)
subplot(p1,p2) %>% highlight('plotly_click') %>% hide_legend()
但是，如果两个图都是非聚合图，这确实起作用。
library(crosstalk);library(tidyverse);library(plotly)
d = ggplot2::diamonds %>% slice_sample(prop = 0.01)
m <- d %>% highlight_key(~cut)
#m = crosstalk::SharedData$new(d,key = ~cut)
p1 = m %>% plot_ly() %>% add_markers(x = ~color,color = ~cut)
p2 = m %>% plot_ly() %>% add_markers(x = ~carat,p2) %>% highlight('plotly_click') %>% hide_legend()
版权声明：本文内容由互联网用户自发贡献，该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务，不拥有所有权，不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容， 请发送邮件至 dio@foxmail.com 举报，一经查实，本站将立刻删除。
