brentthorne | 275dbbe | 2019-02-05 13:31:30 -0500 | [diff] [blame] | 1 | #' Posterdown HTML format (using bookdown::html_document2) |
brentthorne | 275dbbe | 2019-02-05 13:31:30 -0500 | [diff] [blame] | 2 | #' @inheritParams pagedown::poster_relaxed |
| 3 | #' @param ... Additional arguments to \code{rmarkdown::html_document} |
| 4 | #' |
| 5 | #' @return R Markdown output format to pass to |
| 6 | #' \code{\link[rmarkdown:render]{render}} |
| 7 | #' |
| 8 | #' @examples |
| 9 | #' |
| 10 | #' \dontrun{ |
| 11 | #' library(rmarkdown) |
| 12 | #' draft("MyArticle.Rmd", template = "posterdown_html", package = "posterdown") |
| 13 | #' } |
| 14 | #' @export |
| 15 | posterdown_html <- function(..., |
| 16 | template = find_resource("posterdown_html", "template.html"), |
| 17 | css = NULL) { |
| 18 | pagedown::poster_relaxed(..., css = css, template = template) |
| 19 | } |
brentthorne | 75828bf | 2019-04-07 23:37:15 -0400 | [diff] [blame^] | 20 | #' @description The output format \code{poster_betterland()} mimics the style of the |
| 21 | #' \dQuote{BetterPoster} movement from twitter. |
| 22 | #' @rdname posterdown_html |
| 23 | #' @export |
| 24 | posterdown_betterland <- function(..., |
| 25 | template = find_resource("posterdown_betterland", "template.html"), |
| 26 | css = NULL) { |
| 27 | pagedown::poster_relaxed(..., css = css, template = template) |
| 28 | } |