如何在 R 的 Openxlsx2 包中将数据透视表数据格式化为行总数的百分比？

问：

我通过 R 包 OpenXLSX2 在工作簿中放置一个数据透视表。数据默认为 Sum Count 格式。无论如何，是否可以将数据呈现为 R 的 ROW 总数的百分比。下面是代码片段、输出和首选输出：

法典

wb <- wb %>%
  wb_add_pivot_table(df, sheet = 1,dims = "B10", rows = "data_row", cols = "rating", data = "count")

输出：

首选输出：

可以通过在Excel中右键单击手动完成此操作，如下所示：

但是，我需要找到一种方法以编程方式完成此操作。可能吗？