我正在寻找自定义 tableGrob 中的特定列,对于这个可重现的示例,我选择查看自定义理由。
假设您有以下数据框:
df <- data.frame(Order = c(1:3), Name = c("Adam", "Ben", "Charlie"), Score = c(4, 8, 9))
并且您想使用该包gridExtra
呈现表格:
dfGrob <- tableGrob(df, rows = NULL)
grid.arrange(dfGrob)
您可以通过调整用于构建 grob 的主题来调整列的对齐方式,例如:
tt1 <- ttheme_default(core=list(fg_params=list(hjust= 0, x=0.05)),
colhead=list(fg_params=list(hjust=0, x=0.1)))
dfGrob <- tableGrob(df, rows = NULL, theme = tt1)
grid.arrange(dfGrob)
但是,这会调整所有列的理由。假设我只想左对齐订单列,并将其他列保留在中央对齐位置,我该怎么做?
我已经尝试过:
tt1 <- ttheme_default(core=list(fg_params=list(hjust= c(0, 0.5, 0.5), x=c(0.15, 0.5, 0.5))),
colhead=list(fg_params=list(hjust=1, x=0.95)))
dfGrob <- tableGrob(df, rows = NULL, theme = tt1)
grid.arrange(dfGrob)
但这似乎只是按行定制。如何调整此代码以按列自定义?