如何在r中的gridExtra主题tableGrob对象

Question

我想在r的gridExtra包中重新使用tableGrob对象的主题/模板/默认值。

library(gridExtra) 

tableGrob(df, cols = c("Custom Name", "Custom Name2"), 
      show.rownames = FALSE, h.even.alpha = 0) 

tableGrob(df2, cols = c("Different Name", "Different Name2"), 
      show.rownames = FALSE, h.even.alpha = 0) 

通知，我不想再重复show.rownames = FALSE和h.even.alpha = 0多次。创建某种类型的主题或模板的适当方法是什么，以避免在通过对tableGrob的不同调用重复这些选项？我可以用类似于ggplot2的主题来做到这一点，或者是我最好的选择吗？

Answer 1

你可以定义一个新的功能，设置固定的参数，你想要的值，仅要求您提供一个数据帧和列名：

myTG = function(data.frame, cols = c("Name 1", "Name 2")) { 
    tableGrob(data.frame, cols = cols, show.rownames = FALSE, h.even.alpha = 0) 
} 

然后运行它：

tg1 = myTG(df, c("Custom Name 1", "Custom Name 2"))