在 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")))
))
有什么建议么?提前致谢。