2016-06-30 63 views
1

我想樣式表中使用tableHTML包河[R tableHTML add_css文本對齊中心閃亮

當我在R中,使用的tableHTML()功能的閃亮應用程序無法正常工作它產生正是我想。我使用add_css_column將列中的文本與中心對齊。但是,當我在Shiny應用程序中使用它時,標題最終左對齊,行對齊。任何想法如何解決這個問題?

output$viewers_website_top <- renderUI({ 
    tableHTML(website_index, rownames = FALSE, widths=c(200,200)) %>% 
    add_css_column(css = list("text-align", "center"), 
        column_names = names(website_index)) 
}) 

回答

0

這是引導程序3不幸的一個常見問題。無論何時使用shiny,它都會加載一個引導程序3 css(立即),這很難覆蓋。

至於這個使用add_css_header的解決方案可能會解決這個問題。 add_css_header將HTML表的th標籤更改爲您喜歡的(而add_css_header將更改頁眉下方的td標籤)的一個:

output$viewers_website_top <- renderUI({ 
    tableHTML(website_index, rownames = FALSE, widths=c(200,200)) %>% 
    add_css_header(css = list("text-align", "center"), 
        headers = 1:ncol(website_index)) 
}) 

你可以做的另一件事是添加一個單獨的css文件與shiny::includeCSS。有關如何使用includeCSS的更多信息herehere

在CSS文件中,你需要寫:

.table_website_index th { 
    text-align: center; 
} 

而且應該這樣做!

P.S. table_website_index是包分配給表的類,您也可以使用類參數進行更改。

P.S.2我是開發人員 - 感謝您使用該軟件包:)