将accessibility.js 模块与highcharter 一起使用

【问题标题】：Using the accessibility.js module with highcharter将accessibility.js 模块与highcharter 一起使用
【发布时间】：2017-06-05 21:07:17
【问题描述】：

我正在尝试让辅助功能模块与 highcharter 一起使用，但我似乎不知道该怎么做。

我正在尝试将它集成到一个闪亮的应用程序中，所以这是一个非常简单的示例，说明我目前所处的位置：

library(highcharter)
library(shiny)
x <- c("a", "b", "c", "d")
y <- c(1:4)
z <- c(4:7)

data <- data.frame(x,y,z)

ui <- fluidPage(
  fluidRow(
    highchartOutput("chart")
  )
)

server <- function(input, output, session){
  output$chart <- renderHighchart({
hchart(data, "bubble", hcaes(x = x, y = y, size = z))%>%
    hc_add_dependency(name = "modules/accessibility.js")
    })
}

shinyApp(ui = ui, server = server)

但它仍然不允许我浏览气泡。

【问题讨论】：

标签： r highcharts shiny r-highcharter

【解决方案1】：

编辑：

我还不能修复选项卡选项，我会检查一下。对不起。

上一个答案

这是来自 highcharter 的错误，已在开发版本中修复。更新和测试：

source("https://install-github.me/jbkunst/highcharter")

现在默认包含可访问性插件，您可以使用hc_accessibility 函数和高图API documentation 中描述的选项进行配置。

我使用NVDA 进行了测试。

highchart() %>% 
  hc_add_series(data = 1:3, type = "column") %>% 
  hc_accessibility(
    enabled = TRUE,
    keyboardNavigation = list(enabled = FALSE)
  )

【讨论】：