小编Sag*_*gar的帖子

应用程序中的bsModal窗口shiny带有默认Close按钮.有没有办法可以禁用？我试图在SO上查找类似的问题,但没有找到符合我要求的问题.我认为,如果用户可以使用右上角X按钮关闭窗口,则根本不需要另一个Close按钮.请指教.以下可重现的代码将生成一个示例bsModal窗口来理解我的问题.

library(shiny)
library(shinyBS)

if(interactive()){
  shinyApp(
    ui <- fluidPage(
      actionButton("open", "Open"), #action button to trigger the modal window.
      bsModal("id1", "Box 1", "open", size = "small",
              HTML(paste("A simple modal window."))
              )
      ),

    server <- function(input,output,session){

    }
  )
}