2014-02-20 102 views
7

我renderTable与URL链接:[R闪亮打开从renderTable的URL在新标签

output$url_list <- renderTable({ 
    url_list<-as.data.frame(urls_from_plg_table()) 
}, sanitize.text.function = function(x) x, target="_blank", 
    options = list(aLengthMenu = c(5, 30, 50), iDisplayLength = 5)) 

我想从我的闪亮的应用程序在新标签中打开此表中的URL。

我尝试添加:target =“_ blank”,但它不能以这种方式工作。 我该怎么办?

谢谢!

+0

你能分享你就得到什么输出?或者我们如何重新创建'urls_from_plg_table()'?存储什么样的数据? –

回答

10

在data.frame中使用带有HTML标记的字符串。 (并且不要忘记sanitize.text.function = function(x) x按原样评估您的HTML标签)。

例如:

shiny::runApp(list( 
    ui = bootstrapPage(

    tableOutput("table") 

    ), 

    server = function(input, output) { 

    output$table <- renderTable({ 

     urls <- c("http://www.google.fr", "http://www.google.fr") 
     refs <- paste0("<a href='", urls, "' target='_blank'>GOOGLE</a>") 

     data.frame(refs) 

    }, sanitize.text.function = function(x) x) 

    } 
))