Изменение заголовка предупреждения Shinyjs в R

Я создаю блестящее приложение R и использую функцию shinyjs::alert, чтобы пользователи знали, когда отправка прошла успешно. Заголовок по умолчанию для всплывающего окна — это IP-адрес 127. Можно ли изменить это на строку другого текста? В идеале вместо него было бы использовано название моей организации.

Приведенный ниже код взят из документации shinyjs::alert с небольшими изменениями для создания кнопки, которая отправляет сообщение Hello World! как всплывающее окно.

введите здесь описание изображения

if (interactive()) {
  library(shiny)
  library(shinyjs)
  shinyApp(
    ui = fluidPage(
      useShinyjs(),  # Set up shinyjs
      actionButton("btn", "Click me")
    ),
    server = function(input, output) {
      observeEvent(input$btn, {
        # Change the following line for more examples
        alert("Hello world!")
      })
    }
  )
}

Изменить: при запуске в ОС Windows на Microsoft Edge сообщение по умолчанию выглядит как

введите здесь описание изображения


person jessefleri    schedule 20.08.2020    source источник
comment
Вы проверили это в своем браузере? Для меня в Firefox и Edge вообще не отображается заголовок.   -  person starja    schedule 20.08.2020


Ответы (2)


Для этого вы можете использовать внешний пакет:

person shosaco    schedule 21.08.2020

Когда я запускаю ваш код в Linux (в Firefox), он выглядит так:

скриншот

Может быть, заголовок окна исходит из вашего браузера/операционной системы?

person novica    schedule 20.08.2020