warship warship - 4 years ago 433
R Question

Create URL hyperlink in R Shiny?

My code:

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)
})
})
)


Current output:

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


Desired output:

URL link: Google Homepage


where
Google Homepage
is a clickable hyperlink.

I'm currently using the
renderUI
/
uiOutput
duo as instructed here: how to create a hyperlink interactively in shiny app?

Answer Source

By using paste, you're treating the url as a string. The function you want to use here is 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)
    })
  })
)
Recommended from our users: Dynamic Network Monitoring from WhatsUp Gold from IPSwitch. Free Download