r - 在 Rbokeh 的散点图中悬停时在工具提示中显示子图

Question

我正在使用 Rbokeh 生成交互式散点图。我的数据存储在 data.table 中。

data(iris)
library(data.table)
dt.iris <- data.table(iris)
library(rbokeh)
figure() %>%
  ly_points(Sepal.Length, Sepal.Width, data = dt.iris, 
            hover = c(Petal.Width, Petal.Length,Species)) 

与其在上面代码中实现的悬停时在工具提示中打印数字或字符串值，不如在工具提示中绘制与该数据点关联的子图。 例如，如果我悬停在上面的数据点对应于虹膜数据集物种“杂色”，则子图应该为所有具有“杂色”物种的数据点绘制类似 Petal.Width vs Petal.Length 的内容。

以下帖子是相关的：

R中的交互式散点图，覆盖/悬停摘要/工具提示作为用户提供的绘图功能

那篇文章有一个答案，它同时使用包和闪亮的包，但我想在 tooltip中显示我的情节。另外，如果可能的话，我宁愿避免使用 Plotly。