ph_slidelink - 使い方がわからないのですか？

Question

役員には、プレゼンテーションの内部スライドへのリンクを作成する機能があります。しかし私は利用可能な例からそれを使用する方法を知らない。私は、例えば以下の例に登場するページへの実際のハイパーリンクを参照することはありません。：

ここ

fileout <- tempfile(fileext = ".pptx") 
doc <- read_pptx() 
doc <- add_slide(doc, layout = "Title and Content", master = "Office Theme") 
doc <- ph_with_text(x = doc, type = "title", str = "Un titre 1") 
doc <- add_slide(doc, layout = "Title and Content", master = "Office Theme") 
doc <- ph_with_text(x = doc, type = "title", str = "Un titre 2") 
doc <- on_slide(doc, 1) 
slide_summary(doc) # read column id here 
doc <- ph_slidelink(x = doc, id_chr = "2", slide_index = 2) 

print(doc, target = fileout) 

私はどこにも登場する2ページのための任意のリンクが表示されない... あなたは私を助けることができますか？ありがとう!!

Answer 1

「タイトルなし1」（表示モードで、編集モードではない）をクリックすると、スライド2が表示されます。

ph_slidelink(x = doc, id_chr = "2", slide_index = 2)：（slide_index = 2）

Answer 2

おかげでデビッド、 "2" のIDと形状の表示スライド2をクリック！

私は理解していますが、別のスライドにテキストをリンクさせたいと思っていました。私はこのフォークでそれを行う方法を考え出した： https://github.com/danielinteractive/officer 関数ph_add_text2。あなたのパッケージにこれの何かを自由に引っ張ってください、おそらく他の人もこれを必要とします！

乾杯 ダニエル