4

在 Shiny 应用程序中使用 rpivotTable。它工作得很好;但是,我想在表格本身中自定义列宽和背景颜色/主题。

似乎可以通过 CSS 实现,但我目前不知道从哪里开始。

这是(服务器)代码:

功能(输入,输出,会话){

output$pivot <- renderRpivotTable({
rpivotTable(data =   df,  
            rows = c("Age"),
            cols=c("Condition","Sex"),
            vals = "id",
            exclusions= list( Sex = list( "null")),
            aggregatorName = "Count", 
            rendererName = "Bar Chart", 
            width="500px", 
            height="500px")
  })
}

这是用户界面:

 tabPanel("Pivot Analytics", 
                    fluidRow(
                      column(12, div(style = 'overflow-x: scroll', rpivotTableOutput("pivot")))
                      ))

有什么建议么?提前致谢。

4

0 回答 0