-
Notifications
You must be signed in to change notification settings - Fork 0
/
Copy pathrendering.r
42 lines (30 loc) · 2.04 KB
/
rendering.r
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
# CV ----------------------------------------------------------------------
# * CV EN -----------------------------------------------------------------
# Knit the HTML version
rmarkdown::render("cv.rmd", output_file = "cv_resume/cv_en.html", params = list(pdf_mode = FALSE, lang = "en"))
# Knit the PDF version
tmp_html_cv_loc <- fs::file_temp(ext = ".html")
rmarkdown::render("cv.rmd", output_file = tmp_html_cv_loc, params = list(pdf_mode = TRUE, lang = "en"))
pagedown::chrome_print(input = tmp_html_cv_loc, output = "cv_resume/cv_en.pdf")
# * CV IT -----------------------------------------------------------------
# Knit the HTML version
rmarkdown::render("cv.rmd", output_file = "cv_resume/cv_it.html", params = list(pdf_mode = FALSE, lang = "it"))
# Knit the PDF version
tmp_html_cv_loc <- fs::file_temp(ext = ".html")
rmarkdown::render("cv.rmd", output_file = tmp_html_cv_loc, params = list(pdf_mode = TRUE, lang = "it"))
pagedown::chrome_print(input = tmp_html_cv_loc, output = "cv_resume/cv_it.pdf")
# Resume ------------------------------------------------------------------
# * Resume EN -------------------------------------------------------------
# Knit the HTML version
rmarkdown::render("resume.rmd", output_file = "cv_resume/resume_en.html", params = list(pdf_mode = FALSE, lang = "en"))
# Knit the PDF version
tmp_html_resume_loc <- fs::file_temp(ext = ".html")
rmarkdown::render("resume.rmd", output_file = tmp_html_resume_loc, params = list(pdf_mode = TRUE, lang = "en"))
pagedown::chrome_print(input = tmp_html_resume_loc, output = "cv_resume/resume_en.pdf")
# * Resume IT -------------------------------------------------------------
# Knit the HTML version
rmarkdown::render("resume.rmd", output_file = "cv_resume/resume_it.html", params = list(pdf_mode = FALSE, lang = "it"))
# Knit the PDF version
tmp_html_resume_loc <- fs::file_temp(ext = ".html")
rmarkdown::render("resume.rmd", output_file = tmp_html_resume_loc, params = list(pdf_mode = TRUE, lang = "it"))
pagedown::chrome_print(input = tmp_html_resume_loc, output = "cv_resume/resume_it.pdf")