我想从 PowerPoint 演示文稿中选择一个表格,然后循环这个以从每周的 PowerPoint 演示文稿中的表格中提取数据。
但是,包含感兴趣表的幻灯片在一年的数据中略有变化。因此,我不想使用幻灯片编号/ ID 选择表格,而是使用幻灯片标题选择表格,因为即使幻灯片 ID 发生变化,这也将与感兴趣的表格保持一致。
如何使用包含“麻疹监测”和“2018”的标题选择幻灯片?
尝试类似:
library(officer)
library(tidyverse)
doc <- read_pptx("your-spiffy-slides.pptx")
pb <- progress_estimated(length(doc))
map_df(seq_along(doc), ~{
pb$tick()$print()
slide_summary(on_slide(doc, .x)) %>%
mutate(slide_no = .x)
}) -> slides_df
slides_df
将 - 除其他元素外 - 包含幻灯片编号 ( slide_no
) 和一text
列。您可以在text
列中查找目标文本,然后将幻灯片编号与其关联。
有些牌组是 YUGE,因此有进度条(这不是必需的,但如果你有 YUGE 牌组,可以帮助打发时间)。