相关疑难解决方法(0)

我正在尝试将一些相关的悬停信息添加到 echarts4r 图的工具提示中。我想制作一个箱线图，向用户显示异常值的名称（或一些其他信息）。这与向工具提示饼图 echarts4r 添加额外变量和向工具提示饼图 echarts4r 添加额外变量有些相关，但这些解决方案不起作用，因为bind不适用于e_boxplot。

这就是我到目前为止所拥有的

library(echarts4r)

df <- data.frame(
    my_name = letters[1:11],
    x = c(1:10, 25),
    y = c(1:10, -6)
)

df |>
    e_charts() |>
    e_boxplot(y, outliers = TRUE) |>
    e_boxplot(x, outliers = TRUE) |>
    e_tooltip(
      formatter = htmlwidgets::JS("
        function(params)
        {
          return `<strong>${params.name}</strong>
            <br/>val: ${params.value[1]}
          <br/>name: ${params.my_name}`
        }
      "))

我正在尝试使用工具提示中的额外变量绘制绘图，但无法理解如何制作。
例如，我想显示qsec，cyl而 来自 API 的hp列
教程没有帮助我
示例：

library(dplyr)
library(echarts4r)
mtcars %>%  
  tibble::rownames_to_column("model") %>% 
  e_charts(wt) %>% 
  e_scatter(mpg,bind=model) %>%
  e_tooltip(formatter = htmlwidgets::JS("
                                        function(params){
                                        return('<strong>' + params.name + 
                                        '</strong><br />wt: ' + params.value[0] + 
                                        '<br />mpg: ' +  params.value[1] +
                                        '<br />qsec: ' +  this.qsec )   }  "))

预期结果是这样的：https :
//github.com/jbkunst/highcharter/issues/54