Внешний js для математического режима в блестящих таблицах

Этот вопрос связан с Вот этот.

РЕДАКТИРОВАТЬ

Я переформулировал вопрос, чтобы воспроизвести проблему в более сложном приложении.

Я пытаюсь включить математический режим в таблицы. Решение @Stéphane Laurent с использованием katex в EDIT 2 отлично работает. Я отредактировал код, так как мое приложение включает в себя множество таблиц с именами, включающими строку coef_.

library(shiny)

js <- " 
$(document).on('shiny:value', function(event) {
if (event.name.indexOf(event.name.match(/\\b\\w*coef_\\w+\\b/g)) > -1){
if (event.value.match(/(%%+[^%]+%%)/g) !== null) {
var matches = event.value.match(/(%%+[^%]+%%)/g);
var newvalue = event.value;
for(var i=0; i<matches.length; i++){
var code = '\\\\' + matches[i].slice(2,-2);
newvalue = newvalue.replace(matches[i], katex.renderToString(code));
}
event.value = newvalue;
} else {
event.value;
}
}
});
" 

В случае, если имя этой таблицы не включает строку coef_ или n в случае, если таблица с именем, включающим строку coef_, не включает термины с %%, js не должно влиять на нее.

# UI 1
fluidPage(
  tags$head(
    tags$link(rel = "stylesheet", href = "https://cdn.jsdelivr.net/npm/[email protected]/dist/katex.min.css", integrity = "sha384-9tPv11A+glH/on/wEu99NVwDPwkMQESOocs/ZGXPoIiLE8MU/qkqUcZ3zzL+6DuH", crossorigin = "anonymous"),
    tags$script(src = "https://cdn.jsdelivr.net/npm/[email protected]/dist/katex.min.js", integrity = "sha384-U8Vrjwb8fuHMt6ewaCy8uqeUXv4oitYACKdB0VziCerzt011iQ/0TqlSlv8MReCm", crossorigin = "anonymous"),
    tags$script(HTML(js))
  ),
  titlePanel("Hello Shiny!"),
  mainPanel(
    numericInput("mean", "Enter mean", value = 1),
    tableOutput("coef_table1"),
    tableOutput("coef_table2"),
    tableOutput("table")
  ))

# SERVER
server <- function(input, output) {

  output$table <- renderTable({
    x <- rnorm(2)
    y <- rnorm(2, input$mean)
    tab <- data.frame(x = x, y = y, z = c("hello", "%%gamma%%%%delta%%"))
    rownames(tab) <- c("%%alpha%%", "%%beta%%")
    tab
  }, rownames = TRUE)

}

Однако, когда я создаю файл js с кодом в переменной js, сохраняю его в папке www и загружаю, он не работает:

# UI 2
fluidPage(
  tags$head(
    tags$link(rel = "stylesheet", href = "https://cdn.jsdelivr.net/npm/[email protected]/dist/katex.min.css", integrity = "sha384-9tPv11A+glH/on/wEu99NVwDPwkMQESOocs/ZGXPoIiLE8MU/qkqUcZ3zzL+6DuH", crossorigin = "anonymous"),
    tags$script(src = "https://cdn.jsdelivr.net/npm/[email protected]/dist/katex.min.js", integrity = "sha384-U8Vrjwb8fuHMt6ewaCy8uqeUXv4oitYACKdB0VziCerzt011iQ/0TqlSlv8MReCm", crossorigin = "anonymous"),
    tags$script(src = "math_in_tables.js")
  ),
  titlePanel("Hello Shiny!"),
  mainPanel(
    numericInput("mean", "Enter mean", value = 1),
    tableOutput("coef_table1"),
    tableOutput("coef_table2"),
    tableOutput("table")
  ))

Математический режим больше не работает в первой таблице. Что мне здесь не хватает? В браузере ошибок нет.