2

我想将多个可食用的图表和表格从 R 导出到 PowerPoint。

下面是我拥有的代码片段以及我正在使用的包:

library(ggplot2)
library(dplyr)
library(tidyr)
library(gridExtra)
library(grid)
library(officer)
library(rvg)

read_pptx() %>%
   add_slide(layout = "Title and Content", master = "Office Theme") %>%
   ph_with_vg(code = grid.arrange(plot, table, col = 1), type = "body") %>%
   print(target = path)

在输出中,导出的图形和表格仅覆盖幻灯片的底部 2/3。如何修改我的代码,以便我尝试导出的内容可以占据整个幻灯片?

另一个问题:如果我想为幻灯片添加标题,如何指定文本的对齐方式(首选左侧)、大小和颜色?默认对齐是中心,我还没有找到绕过它的方法。

谢谢你。

4

1 回答 1

3

使用ph_location_fullsize()它就会起作用。

library(officer)
library(magrittr)
library(rvg)

read_pptx() %>%
  add_slide(layout = "Title and Content", master = "Office Theme") %>%
  ph_with(value = dml(barplot(1:5)), location = ph_location_fullsize()) %>%
  print(target = "test.pptx")
于 2019-07-01T07:04:55.853 回答