LaTeX/binb
LaTeX/binb
1
0
Fork 0
mirror of https://github.com/eddelbuettel/binb synced 2024-11-12 14:18:53 +01:00
Code Issues Releases Wiki Activity

Merge pull request #15 from robjhyndman/master

Browse Source 
Updated monash theme
This commit is contained in:
Dirk Eddelbuettel 2018-11-21 21:04:55 -05:00 committed by GitHub
commit 938adf1ee0
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
4 changed files with 16 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
DESCRIPTION
View File

@ -18,4 +18,4 @@ Imports: rmarkdown, knitr
VignetteBuilder: knitr
License: GPL (>= 2)
Encoding: UTF-8
RoxygenNote: 6.1.0
RoxygenNote: 6.1.1

6
R/binb.R
View File

@ -21,6 +21,7 @@
##' @param dev A character variable defaulting to \dQuote{pdf}.
##' @param df_print A character variable defaulting to \dQuote{default}.
##' @param fonttheme A character variable defaulting to \dQuote{default}.
##' @param colortheme For the \sQuote{Monash} theme only. A character variable defaulting to \dQuote{monashwhite}.
##' @param highlight A character variable defaulting to \dQuote{tango}.
##' @param keep_tex A logical variable defaulting to \code{FALSE}.
##' @param latex_engine A character variable defaulting to \dQuote{xelatex}.
@ -161,6 +162,7 @@ monash <- function(toc = FALSE,
dev = 'pdf',
df_print = "default",
fonttheme = "default",
colortheme = "monashwhite",
highlight = "tango",
keep_tex = FALSE,
latex_engine = "pdflatex",
@ -169,7 +171,8 @@ monash <- function(toc = FALSE,
md_extensions = NULL,
pandoc_args = NULL) {
for (f in c("beamercolorthememonash.sty", "beamerfontthememonash.sty",
fcolortheme <- paste0("beamercolortheme",colortheme,".sty")
for (f in c("beamerfontthememonash.sty",fcolortheme,
"beamerthememonash.sty", "titlepage.png", "figs/"))
if (!file.exists(f))
file.copy(system.file("rmarkdown", "templates", "monash", "skeleton",
@ -191,6 +194,7 @@ monash <- function(toc = FALSE,
dev = dev,
df_print = df_print,
theme = "monash",
colortheme = colortheme,
fonttheme = fonttheme,
highlight = highlight,
keep_tex = keep_tex,

6
inst/rmarkdown/templates/monash/skeleton/beamerthememonash.sty
View File

@ -4,7 +4,7 @@
\RequirePackage{beamerthememetropolis}
% For binb, one can alter the color theme by by setting eg 'colortheme: monashblue' in the YAML header
\usecolortheme{monashwhite}
%\usecolortheme{monashwhite}
\usefonttheme{monash}
\metroset{progressbar=foot}
@ -46,9 +46,11 @@
\setbeamertemplate{section in toc}[square]
\setbeamerfont{section number projected}{size=\large}
\setbeamertemplate{section in toc shaded}[default][50]
\usepackage{etoolbox}
\patchcmd{\beamer@sectionintoc}{\vskip1.5em}{\vskip0.2em}{}{}
% Figure placement
\RequirePackage[absolute,overlay]{textpos}
\setlength{\TPHorizModule}{1cm}

10
man/metropolis.Rd
View File

@ -26,10 +26,10 @@ iqss(toc = FALSE, slide_level = 3, incremental = FALSE,
monash(toc = FALSE, slide_level = 2, incremental = FALSE,
fig_width = 8, fig_height = 5, fig_crop = TRUE,
fig_caption = TRUE, dev = "pdf", df_print = "default",
fonttheme = "default", highlight = "tango", keep_tex = FALSE,
latex_engine = "pdflatex", citation_package = c("none", "natbib",
"biblatex"), includes = NULL, md_extensions = NULL,
pandoc_args = NULL)
fonttheme = "default", colortheme = "monashwhite",
highlight = "tango", keep_tex = FALSE, latex_engine = "pdflatex",
citation_package = c("none", "natbib", "biblatex"), includes = NULL,
md_extensions = NULL, pandoc_args = NULL)
presento(toc = FALSE, slide_level = 2, incremental = FALSE,
fig_width = 10, fig_height = 7, fig_crop = TRUE,
@ -75,6 +75,8 @@ presento(toc = FALSE, slide_level = 2, incremental = FALSE,
\item{md_extensions}{An optional character variable defaulting to \code{NULL}.}
\item{pandoc_args}{An optional character variable defaulting to \code{NULL}.}
\item{colortheme}{For the \sQuote{Monash} theme only. A character variable defaulting to \dQuote{monashwhite}.}
}
\value{
RMarkdown content processed is returned for use by the