在ShinyBS中增加工具提示/彈出窗口的長度

Question

ShinyBS包提供了一種簡單易用的方法，可將工具提示和彈出窗口添加到Shiny應用的各個元素中。但是，這些長度大約限制在40個字符左右。我真的需要增加這些工具提示中允許的字符數。

一個例子：

library(shiny) 
library(shinyBS) 

shinyApp(
    ui = fluidPage(
     column(5,sliderInput("n", "Short tooltip", 5, 100, 20), 
        bsTooltip("n",title="This is a short tooltip, so it works."), 
        sliderInput("n2", "Long tooltip", 5, 100, 20), 
        bsTooltip("n2",title="This is a longer tooltip, so it doesn't work.")) 
), 
    server = function(input, output) {} 
) 

Answer 1

它實際上是一個轉義'的在第二個提示的標題的存在是造成你的問題，沒有標題的長度。輸入\\'代替每個'將解決問題。

嘗試運行這個（或者，對於這個問題，在?bsTooltip的例子）地看到，在長標題提示工作得很好：

library(shiny) 
library(shinyBS) 

shinyApp(
    ui = fluidPage(
     column(5, 
      sliderInput("n", "Short tooltip", 5, 100, 20), 
      bsTooltip("n",title="This is a short tooltip, so it works."), 
      sliderInput("n2", "Long tooltip", 5, 100, 20), 
      bsTooltip("n2",title="This is a longer tooltip, which\\'ll still work, as long as each special character is escaped with a \\\\\\\\.")) 
), 
    server = function(input, output) {} 
)