图表和 DT 的客户端链接 table

Question

我正在尝试改编 Carson Sievert 的 plotly book 中的示例，他将传单地图链接到数据框，以便它适用于绘图图表

 library(plotly)
 library(crosstalk)
 library(sf)

 nc <- sf::st_read(system.file("shape/nc.shp", package = "sf"), quiet = TRUE)
 df <- nc %>% 
     select(AREA,NAME) %>% 
     group_by(NAME)

 st_geometry(df) <- NULL

 hk <- highlight_key(df)

chart <-plot_ly(df, y= ~NAME,x= ~AREA, split = ~NAME) %>%
       highlight() %>%
       layout(showlegend = FALSE) 

  bscols(chart, DT::datatable(hk))

这会为每一行生成所需的图表和数据，但单击一个值图表上没有过滤数据-table

Answer 1

您需要为 plotly 图表和 dt table 提供 hk。另外，我建议添加 layout(barmode = "overlay") 条形图定义

图表和 DT 的客户端链接 table

Client-side linking of plotly chart and DT table

dt

r-plotly