在 R Shiny 中创建 URL 超链接？答案

【问题标题】：Create URL hyperlink in R Shiny?在 R Shiny 中创建 URL 超链接？
【发布时间】：2017-06-22 04:37:40
【问题描述】：

我的代码：

library(shiny)
runApp(
  list(ui = fluidPage(
     uiOutput("tab")
    ),
  server = function(input, output, session){
    url <- a("Google Homepage", href="https://www.google.com/")
    output$tab <- renderUI({
      paste("URL link:", url)
    })
  })
)

当前输出：

URL link: <a href="https://www.google.com/">Google Homepage</a>

期望的输出：

URL link: Google Homepage

Google Homepage 是一个可点击的超链接。

我目前正在使用renderUI/uiOutput 二重奏组，如下所示：how to create a hyperlink interactively in shiny app?

【问题讨论】：

标签： r hyperlink shiny

【解决方案1】：

通过使用paste，您将url 视为一个字符串。这里要使用的函数是tagList：

runApp(
  list(ui = fluidPage(
     uiOutput("tab")
    ),
  server = function(input, output, session){
    url <- a("Google Homepage", href="https://www.google.com/")
    output$tab <- renderUI({
      tagList("URL link:", url)
    })
  })
)

【讨论】：

如何确保 url 链接在 SHiny 应用中打开而不是新标签页？

【解决方案2】：

你可以随意使用html标签tag

    tags$a(href="www.rstudio.com", "Click here!")
## <a href="www.rstudio.com">Click here!</a>

【讨论】：

另外，要在新浏览器中打开它，添加 target="_blank" 作为参数。