我正在尝试一些报告的自动化，我想坚持公司的 power point 风格（至少尽可能多）。直接使用可用的模板
ppt <- read_pptx("myTemplate.pptx")
至少对我来说相当复杂。
因此，我正在尝试使用标准的“Office 主题”，并试图使其看起来接近公司模板。我希望能够左对齐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()