在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")
})
}
这是UI:
tabPanel("Pivot Analytics",
fluidRow(
column(12, div(style = 'overflow-x: scroll', rpivotTableOutput("pivot")))
))
有什么建议吗?提前谢谢。