ph_slidelink - Vous ne savez pas comment l'utiliser?

Question

c'est génial que l'agent ait une fonction pour créer des liens vers des diapositives internes à la présentation. Cependant, je ne sais pas comment l'utiliser à partir des exemples disponibles. Je ne vois jamais un lien réel vers une page qui apparaît dans l'exemple ci-dessous .: par exemple

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) 

Ici, je ne vois pas de lien pour la page 2 apparaissant n'importe où ... Pouvez-vous me aider? Merci!!

Answer 1

Si vous cliquez sur "Un titre 1" (avec mode d'affichage, pas de mode d'édition), la diapositive 2 est affichée.

ph_slidelink(x = doc, id_chr = "2", slide_index = 2): en cliquant sur la forme avec id "2", affichage diapositive 2 (slide_index = 2)

Answer 2

Merci David! Je comprends, mais je voulais avoir un lien de texte vers une autre diapositive. Pendant ce temps, j'ai compris comment le faire dans cette fourche: https://github.com/danielinteractive/officer dans la fonction ph_add_text2. N'hésitez pas à tirer quelque chose de ceci dans votre paquet, probablement d'autres ont besoin de ceci aussi!

Vive Daniel