r语言 - 在闪亮的应用程序中包含包含提示元素的HTML文件会遇到麻烦

Question

我试图使用tippy在将出现在闪亮应用程序中的文本段落内的某些单词上提供悬浮文本。为了更容易编辑长段落的教学文本，而不是直接在闪亮的UI中包含文本，我在单独的RMarkdown文件中生成了指令，然后使用shiny::includeHTML()嵌入相应的HTML文件。

倾斜的悬停文本在渲染的HTML中工作得很好，但不会出现在闪亮的应用程序中。

在应用程序中直接调用tippy确实有效，所以这是一个选项，但如果可能的话，我更愿意将长教学文本与应用程序文件分开。

. rmd文件(生成HTML)和下面的app.R文件说明了这个问题。谢谢你的建议。

long_text。限制型心肌病

---
output: html_document
---
```{r setup, include=FALSE}
knitr::opts_chunk$set(echo = FALSE)
library(tippy)
library(shiny)
```
Regular HTML tags work:
```{r}
tags$p('Hello', tags$span(style="color:blue", 'world'))
```

But tippy does not:
```{r}
tippy('This works in the HTML file but not when embedded in the Shiny app', 'Uh oh')
```

应用程序。R

library(shiny)
library(tippy)
ui <- fluidPage(
tags$p(tippy('Using tippy directly in the Shiny UI works fine', 'nice')),
htmlOutput('text')    
)
server <- function(input, output) {
output$text <- renderUI(includeHTML('longText.html'))

}
shinyApp(ui = ui, server = server)

Answer 1

将HTML文档构建为片段。工具提示不会在编织的HTML片段上工作，但是当你在Shiny应用程序中包含构建的HTML文件时，你会看到工具提示。

---
output: html_fragment
---