Rozwijam przepływ pracy, gdzie ja

  1. współpraca pracuje na Dokcie Google, który jest wtedy
  2. pobrane jako .docx z pakietem Googledrive,
  3. przekonwertowany na .rmd z RMARNDOWN: Pandoc_convert (),
  4. stylizacja i logo stosowane i
  5. renderowane jako .html & pdf do dystrybucji.

Obecnie zawieszam się w kroku 3, gdy plik .rmd nie ma nagłówka.

 pandoc_convert("example.docx", "markdown", output = "out.Rmd")

Jak mogę wstrzyknąć YAML z innego pliku w skrypcie przepływu pracy? na przykład Ten nagłówek:

---
  title: "Title1"    
  html_document:
  number_sections: yes
  self_contained: yes
  toc: yes
  toc_depth: 3
  toc_float: yes
---
1
mattador 8 styczeń 2020, 00:15

1 odpowiedź

Najlepsza odpowiedź

Załóżmy, że twój nagłówek jest w header.yaml. Następnie przeczytaj dwa pliki i napisz je jako jeden:

fulltext <- c(readLines("header.yaml"), readLines("out.Rmd"))
writeLines(fullText, "out2.Rmd")

Oczywiście można również umieścić nagłówek w zmiennej łańcuchu zamiast czytać go z pliku, np.

header <- '---
  title: "Title1"    
  html_document:
  number_sections: yes
  self_contained: yes
  toc: yes
  toc_depth: 3
  toc_float: yes
---'
fulltext <- c(header, readLines("out.Rmd"))
writeLines(fullText, "out2.Rmd")
2
user2554330 7 styczeń 2020, 23:45