2016-01-03 66 views
3

我在我的Shiny應用程序中有一個數據表。默認情況下,列名稱是數據集的列名稱。 我想更改顯示的列名,而不觸及數據集本身。重命名閃亮的儀表板數據表中的列

我發現this文檔正是我所需要的,但我不知道如何將其轉換爲R語法。

這是當前的方式我渲染表:我已經試過加入columnDefs選擇在幾個方面,但沒有奏效

output$score_data_table <- renderDataTable({ 
    selectedArea_overview_TC()}, 
    options = list(orderClasses = TRUE, 
        lengthMenu = list(c(15,25,50,100,-1), c('15','25','50','100','All')), 
        pageLength = 15, 
        order=list(1, 'desc')) 
) 

任何提示將不勝感激!

+0

在'?renderDataTable'中有一個傳遞給'datatable()'的'...'參數。在'?datatable'文檔中,您可以找到您可能需要檢查的'rownames'和'colnames'參數。 – nicola

+1

將其分配給新的數據框並更改列名稱有什麼問題?這不是什麼方法可以做到這一點? –

回答

1

您可以在renderDataTable中使用colnames。例如:

output$table1 <- DT::renderDataTable({ 
    datatable(messages(), 
    colnames = c('Type', 'Message', 'Check', 'Entity', 'ID','File'), 
    options = list(pageLength = 50, autoWidth = TRUE, 
    columnDefs = list(list(width = '800px', targets = c(2)))),filter='top')}) 
0

我陷入了同一陷阱。您實際需要的文檔是columns.title

output$score_data_table <- renderDataTable({ 
    selectedArea_overview_TC() 
    }, 
    options = list(orderClasses = TRUE, 
       lengthMenu = list(c(15,25,50,100,-1), c('15','25','50','100','All')), 
       pageLength = 15, 
       order=list(1, 'desc') 
       columns = list(
        list(title = 'newnameforcol1'), 
        NULL, # skip column 2 
        list(title = 'newnameforcol3'), 
       ) 
) 
) 

標題也可以與columnDefs一起使用。我不確定。

相關問題