私はいくつかのレポートの自動化を試していますが、(少なくとも可能な限り) 企業のパワーポイント スタイルに固執したいと考えています。利用可能なテンプレートを直接使用する
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()