GigaScience rticle support

DESCRIPTION

@@ -27,6 +27,8 @@ Authors@R: c(
   person("Marc-Andre", "Desautels", role = c("aut", "cph"), email = "[email protected]"),
   person("Dominik", "Leutnant", role = c("aut", "cph"), email = "[email protected]"),
   person(family = "MDPI", role = c("aut", "cph")),
+  person("Arthur", "Eschenlauer", role = c("aut", "cph"), email = "[email protected]", comment = c(ORCID = "0000-0002-2882-0508")),
+  person(family = "GigaScience", role = c("aut", "cph")),
   person("Oğuzhan", "Öğreden", role = c("aut"), comment = c(ORCID = "0000-0002-9949-3348"))
   )
 Description: A suite of custom R Markdown formats and templates for

NAMESPACE

@@ -9,6 +9,7 @@ export(asa_article)
 export(ctex)
 export(ctex_template)
 export(elsevier_article)
+export(gigascience_article)
 export(ieee_article)
 export(jss_article)
 export(mdpi_article)

R/gigascience_article.R

@@ -0,0 +1,27 @@
+#' GigaScience journal format.
+#'
+#' Format for creating submissions to the GigaScience journal. Adapted from GigaScience Overleaf template
+#' \href{https://www.overleaf.com/latex/templates/template-for-gigascience-journal-manuscript-submissions/shgtrssvbjhs}{https://www.overleaf.com/latex/templates/template-for-gigascience-journal-manuscript-submissions/shgtrssvbjhs}.
+#'
+#' @inheritParams rmarkdown::pdf_document
+#' @param ... Additional arguments to \code{rmarkdown::pdf_document}
+#'
+#' @return R Markdown output format to pass to
+#'   \code{\link[rmarkdown:render]{render}}
+#'
+#' @examples
+#'
+#' \dontrun{
+#' library(rmarkdown)
+#' draft("MyArticle.Rmd", template = "gigascience_article", package = "rticles")
+#' }
+#'
+#' @export
+gigascience_article <- function(...,
+                             keep_tex = TRUE,
+                             md_extensions = c("-autolink_bare_uris")) {
+  inherit_pdf_document(...,
+                       template = find_resource("gigascience_article", "template.tex"),
+                       keep_tex = keep_tex,
+                       md_extensions = md_extensions)
+}

inst/rmarkdown/templates/gigascience_article/resources/template.tex

@@ -0,0 +1,87 @@
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+% Please note that whilst this template provides a
+% preview of the typeset manuscript for submission, it
+% will not necessarily be the final publication layout.
+%
+\documentclass[$paper$,$reftype$]{$documentclass$}
+
+% declare highlighting-macros if any
+$if(highlighting-macros)$
+$highlighting-macros$
+$endif$
+
+% include header-includes if any
+$for(header-includes)$
+$header-includes$
+$endfor$
+
+% before include preamble if any
+$preamble$
+% after include preamble if any
+
+%%% declare packages to be used
+\usepackage{forarray}
+\usepackage{xstring}
+\usepackage{graphicx}
+\usepackage{siunitx}
+
+%%% unpackged commands
+\providecommand{\tightlist}{%
+  \setlength{\itemsep}{0pt}\setlength{\parskip}{0pt}}
+
+
+%%% Flushend: You can add this package to automatically balance the final page, but if things go awry (e.g. section contents appearing out-of-order or entire blocks or paragraphs are coloured), remove it!
+% \usepackage{flushend}
+
+
+
+\title{$title$}
+
+%%% Authors
+$for(author)$ \author[$for(author.affiliation)$$author.affiliation$$sep$,$endfor$$for(author.note)$,\authfn{$author.note$}$endfor$]{$author.name$} $sep$
+$endfor$
+
+%%% Author Affiliations
+$for(affiliation)$ \affil[$affiliation.id$]{$affiliation.name$$if(affiliation.address)$, $affiliation.address$$endif$}
+$endfor$
+
+%%% Use the \authfn to add symbols for additional footnotes, if any. 1 is reserved for correspondence emails; then continuing with 2 etc for contributions.
+%%% Author Notes
+$for(authnote)$\authnote{\authfn{$authnote.id$}$authnote.note$}$sep$
+$endfor$
+
+
+%%% Paper category
+\papercat{$papercat$}
+
+%%% "Short" author for running page header
+\runningauthor{$runningauthor$}
+
+%%% Should only be set by an editor
+\jvolume{00}
+\jnumber{0}
+\jyear{2018}
+
+\begin{document}
+\begin{frontmatter}
+\maketitle
+\begin{abstract}
+$abstract$
+\end{abstract}
+
+\begin{keywords}
+$for(keywords)$$keywords$$sep$; $endfor$
+\end{keywords}
+\end{frontmatter}
+
+\begin{keypoints*}
+\begin{itemize}
+$for(keypoints)$\item{$keypoints$}$sep$
+$endfor$
+\end{itemize}
+\end{keypoints*}
+
+$body$
+
+%%% The document ends here
+\end{document}