如何减少tableOutput Shiny中行的高度？

Question

我想用tableOutput降低表构建行的高度 我尝试了下一个代码，但没有工作

UI.R中的

：

 tableOutput("table"),tag$tr(tags$style(type="text/css", "#table {line-height:50%}"))

但不起作用，我也试过server.R

 output$table<- renderTable({
 print(data())
 },include.rownames=F,html.table.attributes=list(cellspacing="10px"))

但不起作用

由于

Answer 1

一些事情：

• 虽然您在table中为数据表ui.R命名，但它实际上是其容器的ID（<div>元素），而不是<table>本身。
• Shiny将line-height属性设置为<td>级别，因此为了覆盖它，您必须将line-height设置为<td>级别。

以下是工作原理：

tags$head(tags$style(type="text/css", "#table table td {line-height:50%;}"))

您可以使用它来替换{​​{1}}部分。