grid.table中的列之间的行

Question

当我使用gridExtragrid.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

您可以设置核心表区域的线条颜色相匹配的两个默认的填充颜色之间的白线：

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)