使用gridExtra中的grid.table（），行标题中没有网格线

Question

当我在grid.table的主题中为行标题着色时，行之间的水平线不会出现。有时会显示一行，但它比核心单元之间的线要薄。

如果我将行填充设置为5行，有时会出现网格线，但这显然不实用。

以下是一个例子：

library(grid)
library(gridExtra)
t = ttheme_default(
    rowhead=list(
        fg_params=list(fontface="plain"),
        bg_params=list(fill=c(NA, rep("grey80",5)))
    )
)
grid.newpage()
grid.table(iris[1:5, 1:3], theme=t)

巴蒂斯特的答案解决了我的问题。谢谢！

Answer 1

默认情况下，背景矩形的颜色（边框）设置为NA，网格中没有空格。如果要查看边框，则应设置实际颜色，例如

bg_params=list(fill=c(NA, rep("grey80",5)), col="white")

对于较粗的行，请使用lwd参数。