如何解决在R中更改Shinyjs警报的标题
我正在构建一个R闪亮的应用程序,并且正在使用shinyjs::alert
函数来使用户知道提交成功的时间。弹出窗口的默认标头是127 IP地址。可以将其更改为不同文本的字符串吗?理想情况下,将使用我的组织名称代替。
在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!")
})
}
)
}
编辑: 在Microsoft Edge上的Windows操作系统上运行时,默认消息显示为
解决方法
您可以为此使用外部软件包:
- shinyalert:https://daattali.com/shiny/shinyalert-demo/
- shinyWidgets:https://github.com/dreamRs/shinyWidgets#sweet-alert
当我在Linux(在Firefox上)上运行您的代码时,外观如下:
也许窗口标题来自您的浏览器/操作系统?
版权声明:本文内容由互联网用户自发贡献,该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容, 请发送邮件至 dio@foxmail.com 举报,一经查实,本站将立刻删除。