knitr::opts_chunk$set(echo = FALSE)
knitr::kable(talks[, c("datetime", "room", "studentName", "studentAffiliation")])
cat("\\pagestyle{empty}\n") for (i in seq_len(nrow(talks))) { talk <- talks[i,] cat("\\cleardoublepage\n") cat(talk$datetime, talk$room, talk$sessionName, "\n") abstract <- readLines(file.path(dir, "Abstracts", talk$abstract)) cat("```\n") cat(abstract, sep = "\n") cat("```\n\\clearpage\n") scoresheet(talk, oral = !grepl("Poster", talk$sessionName)) cat("\\includepdf[fitpaper=true,pages=-]{",params$summaries[i],"}\n", sep="") }
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.