如何在闪亮的应用程序中以交互方式创建超链接？ [英] how to create a hyperlink interactively in shiny app?

问题描述

我正在构建一个闪亮的应用程序，我想以交互方式创建超链接。
我知道如何通过使用（）添加到ui.r的链接，但是如何让我的闪亮应用程序以交互方式更改该链接？

I am building a shiny app in which I want to create hyperlinks interactively. I know how to add a link to the ui.r by using a() but how can I let my shiny app change that link interactively?

有谁知道如何做到这一点？

Does anyone have an idea about how to do this?

推荐答案

您可以使用 renderUI 动态呈现HTML：

You can use renderUI to dynamically render HTML:

library(shiny)
runApp(
  list(ui = fluidPage(
    selectInput('website', 'Choose a website'
                , list(bbc = "http://www.bbc.co.uk"
                       , google = "http://www.google.com"
                       , cnn = "http://www.cnn.com")
    )
                , htmlOutput("mySite")
    )
  ,server = function(input, output, session){
    output$mySite <- renderUI({
      tags$a(href = input$website, input$website)
    })
  })
)

这篇关于如何在闪亮的应用程序中以交互方式创建超链接？的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持IT屋！