grid.tables whitout中的两个字体使用grid.draw（）

Question

前几天我发布了question，他给了我很多帮助@hrbrmstr。

我完全理解grid.table()只是grid.draw(tableGrob(...))的包装，但现在我遇到了另一种问题：

当我发布关于app.powerbi的报告时，PowerBI不接受grid.draw()声明。

换句话说，我需要创建一个网格表对象而不创建grob对象。

我是这样做的：

my.dataframe <- data.frame(BDS_ID = c("001","002"),
                           PRIORITY = c("high","medium"),
                           STATUS = c("onair","onair"),
                           COMPANY = c("airfr","fly"))
mytheme <- ttheme_default(core=list(
           fg_params=list(fontface="bold"),
           bg_params = list(fill=c("grey95", "grey90"))
))
grid.table(my.dataframe, theme = mytheme, rows = NULL)

但我需要更改grid.table的布局，仅为第一列设置粗体字。

有谁知道如何实现这个目标？

由于