devtools::install_github('rstudio/rmarkdown') library(rmarkdown) setwd("~/Dropbox/Projects/Personal_Website") #Render the site render_site() #Creates a PDF of the CV render("cv.Rmd", "pdf_document",output_file="./_site/cv_Alex_Singleton.pdf") #Inserts a download link to the PDF CV conn<-file("./_site/cv.html") text <- readLines(conn) close(conn) d_link <- "