我正在试验一些报告的自动化,我想坚持企业的权力点风格(至少尽可能多)。直接使用可用模板
ppt <- read_pptx("myTemplate.pptx")
至少对我来说非常复杂。
因此,我正在尝试使用标准&#34; Office主题&#34;我试图使它看起来接近公司模板。我希望能够保持对齐ctrTitle
,subTitle
和标题类型。
如果我运行下面的示例,则标题居中。有谁知道如何左对齐它?我在文档中找不到。
提前谢谢。
require(officer)
require(magrittr)
ppt = read_pptx()
ppt = ppt %>% add_slide(layout = "Title Slide", master = "Office Theme")
ppt = ppt %>% ph_with_text(str = "Title String", type = "ctrTitle")
print(ppt, target = "first_example.pptx") %>% invisible()