Сохранение pptx в формате pdf в R

Я создал файлы PowerPoint с помощью пакета Officer, и я также хотел бы сохранить их в формате pdf из R (не хочу вручную открывать и сохранять каждый файл в формате pdf). Это возможно?


r officer
person det    schedule 01.10.2019    source источник
comment
Какую ОС вы используете?   -  person NelsonGon    schedule 01.10.2019

Ответы (2)


arrow_upward
6
arrow_downward

вы можете сохранить объект PowerPoint, отредактированный с помощью кода, размещенного здесь: создать pdf в дополнение к word docx с помощью Officer.

Вам нужно будет сначала установить pdftools и libreoffice

library(pdftools)
office_shot <- function( file, wd = getwd() ){
  cmd_ <- sprintf(
    "/Applications/LibreOffice.app/Contents/MacOS/soffice --headless --convert-to pdf --outdir %s %s",
    wd, file )
  system(cmd_)

  pdf_file <- gsub("\\.(docx|pptx)$", ".pdf", basename(file))
  pdf_file
}
office_shot(file = "your_presentation.pptx")

Обратите внимание, что автор пакета officer — это тот, кто направил кого-то к этот ответ.

person Corey Pembleton    schedule 01.10.2019
comment
Это должно быть включено в пакет docxtractr: cran.r-project.org /web/packages/docxtractr/index.html в функции docxtractr::convert_to_pdf. - person John M; 11.06.2020

arrow_upward
4
arrow_downward

Обратите внимание, что ответ от Кори Пемблтона имеет путь iOS к LibreOffice. (Чего лично я изначально не заметил). Путь Windows будет примерно таким: "C:/Program Files/LibreOffice/program/soffice.exe".

Поскольку первоначальный ответ был предоставлен Кори, пример с использованием docxtractr::convert_to_pdf теперь можно найти здесь. Пакет и функция - это те, которые Джон М прокомментировал в первоначальном ответе Кори .

person jruizcabrejos    schedule 29.12.2020