URL-Hyperlink in R Shiny erstellen?

Question

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

Stromausgang:

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

gewünschte Ausgabe:

URL link: Google Homepage

wo Google Homepage einen anklickbaren Hyperlink ist.

ich zur Zeit mit dem renderUI/uiOutput Duo wie hier angewiesen: how to create a hyperlink interactively in shiny app?

Answer 1

von paste verwenden, Sie zum url als String zu behandeln. Die Funktion, die Sie wollen hier verwenden ist 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) 
    }) 
    }) 
)