My code:
library(shiny)
runApp(
list(ui = fluidPage(
uiOutput(\"tab\")
),
server = function(input, output, session){
url <- a(\"Google Ho
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)
})
})
)