grid.table 中的列之间的线

Question

当我使用 gridExtra grid.table 打印 table 时，我无法使列之间的白线消失。我试过玩 bg_params :

library(gridExtra)
library(grid)
n=5
d <- data.frame(x=rnorm(n),y=rnorm(n),z=rnorm(n))


mytheme <- ttheme_default(colhead = list(bg_params=list(fill="#DDEBF7", col="#DDEBF7",lwd=0))
)
grid.table(d, theme = mytheme)

但我仍然在列之间看到白线

Answer 1

您可以设置核心table区域的线条颜色以匹配两种默认填充颜色：

mytheme <- ttheme_default(colhead = list(bg_params=list(fill="#DDEBF7", col="#DDEBF7",lwd=0)),
                          core = list(bg_params = list(col = c("grey95", "grey90")))
)
grid.table(d, theme = mytheme)

grid.table 中的列之间的线

Line between columns in grid.table

r

gridextra