在bslib包的幫助下，我在我的 Shiny 應用程式中使用了 Bootstrap 4 。然后制作的popoversshinyBS::popify不起作用。是否有替代方案或使它們起作用的方法？
library(shiny)
library(shinyBS)
library(bslib)
ui <- fluidPage(
theme = bs_theme(version = 4, bootswatch = "united"),
popify(
bsButton("pointlessButton", "Button", style = "primary", size = "large"),
"A Pointless Button",
"This button is <b>pointless</b>. It does not do <em>anything</em>!"
)
)
server <- function(input, output, session) {}
shinyApp(ui, server)
uj5u.com熱心網友回復：
你可以試試spsComps，它適用于BS4
library(shiny)
library(shinyBS)
library(bslib)
library(spsComps)
ui <- fluidPage(
theme = bs_theme(version = 4, bootswatch = "united"),
bsPopover(
bsButton("pointlessButton", "Button", style = "primary", size = "large"),
"A Pointless Button",
"This button is <b>pointless</b>. It does not do <em>anything</em>!",
"bottom", html = T
)
)
server <- function(input, output, session) {}
shinyApp(ui, server)
轉載請註明出處，本文鏈接：https://www.uj5u.com/net/507485.html
上一篇：單擊按鈕時更改頁面布局
下一篇：如何連續顯示下拉選單