2014-02-20 100 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) 

    } 
))