Почему DataTable выдает ошибку при нажатии на ссылку? - PullRequest
Новая
       33

Почему DataTable выдает ошибку при нажатии на ссылку?

0 голосов
/ 31 марта 2020

Когда я щелкаю ссылку внутри ячейки DataTable, я получаю ошибку Ajax со ссылкой на:

https://datatables.net/manual/tech-notes/7

Пример минимального воспроизведения ниже. Это происходит только тогда, когда я открываю приложение Shiny в своем браузере (Firefox), а не внутри RStudio.

Как это исправить? 

library(shiny)

ui <- fluidPage(
        mainPanel(
           DT::dataTableOutput("dt_output")
    )
)

server <- function(input, output) {

    output$dt_output <- DT::renderDataTable({
        dt <- data.frame(link = c('<a href = \'https://cloud.r-project.org/bin/windows/base/R-3.6.3-win.exe\'><img src = \'https://www.r-project.org/Rlogo.png\'></img></a>'))

        dt

    }, escape = FALSE)
}

shinyApp(ui = ui, server = server)
...