Update sim_article to use Wiley NJD V5 (#548)

DESCRIPTION

@@ -1,7 +1,7 @@
 Type: Package
 Package: rticles
 Title: Article Formats for R Markdown
-Version: 0.25.3
+Version: 0.25.4
 Authors@R: c(
     person("JJ", "Allaire", , "jj@posit.co", role = "aut"),
     person("Yihui", "Xie", , "xie@yihui.name", role = "aut",

NEWS.md

@@ -1,5 +1,11 @@
 # rticles (development version)
 
+## MAJOR CHANGES
+
+- Update WileyNDJ template to V5 for `sim_article()`. This implies new resources files and new available options in template (thanks, @henrikibster, #545).
+
+## MINOR CHANGES
+
 - `elsevier_article()` Rmd skeleton is now updated to show different available bibliostyle file (i.e `*.bst` for _natbib_) with `elsearticle` document class. `biblio-style: elsarticle-harv` is set by default to correctly work with the `authoryear` classoption already set (thanks, @pepijn-devries, #545).
 
 - Update `ajs_article()` resources for the template.

R/article.R

@@ -553,7 +553,9 @@ sage_article <- function(..., highlight = NULL, citation_package = "natbib") {
 
 #' @section `sim_article`: Format for creating submissions to Statistics in
 #'   Medicine. Based on the official Statistics in Medicine
-#'   at `https://onlinelibrary.wiley.com/page/journal/10970258/homepage/la_tex_class_file.htm`.
+#'   at `https://authorservices.wiley.com/author-resources/Journal-Authors/Prepare/new-journal-design.html`.
+#'
+#'   This format uses xelatex by default as PDF engine to support the specific NJD fonts, per guideline.
 #'
 #' Possible arguments for the YAML header are:
 #' * `title` title of the manuscript
@@ -565,17 +567,18 @@ sage_article <- function(..., highlight = NULL, citation_package = "natbib") {
 #' * `received`, `revised`, `accepted` dates of submission, revision, and acceptance of the manuscript
 #' * `abstract` abstract, limited to 250 words
 #' * `keywords` up to 6 keywords
+#' * `abbreviations`, list of abbreviations and description separated by a comma
 #' * `bibliography` BibTeX `.bib` file
-#' * `classoption` options of the `WileyNJD-v2` class
+#' * `classoption` options of the `WileyNJD` class
 #' * `longtable` set to `true` to include the `longtable` package, used by default from `pandoc` to convert markdown to LaTeX code
 #' * `header-includes`: custom additions to the header, before the `\begin{document}` statement
 #' * `include-after`: for including additional LaTeX code before the `\end{document}` statement
 #' @export
 #' @rdname article
-sim_article <- function(..., highlight = NULL, citation_package = "natbib") {
+sim_article <- function(..., highlight = NULL, citation_package = "natbib", latex_engine = "xelatex") {
   pdf_document_format(
     "sim",
-    highlight = highlight, citation_package = citation_package, ...
+    highlight = highlight, citation_package = citation_package, latex_engine = latex_engine, ...
   )
 }
 

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

@@ -1,4 +1,4 @@
-\documentclass[AMA,STIX1COL,$for(classoption)$$classoption$$sep$,$endfor$]{WileyNJD-v2}
+\documentclass[AMA,STIX1COL$for(classoption)$,$classoption$$endfor$]{WileyNJD-v5}
 
 $if(longtable)$
 \usepackage{longtable}
@@ -138,6 +138,20 @@
 \accepted{$accepted$}
 $endif$
 
+$if(journal)$
+\journal{$journal$}
+$endif$
+
+$if(volume)$
+\volume{$volume$}
+$endif$
+
+$if(copyyear)$
+\copyyear{$copyyear$}
+$endif$
+
+\startpage{$if(startpage)$$startpage$$else$1$endif$}
+
 \raggedbottom
 
 \begin{document}
@@ -156,6 +170,10 @@
 $if(authormark)$
 \authormark{$authormark$}
 $endif$
+$if(runningtitle)$
+\titlemark{$runningtitle$}
+$endif$
+
 
 $for(address)$
 \address[$address.num$]{$address.org$}
@@ -177,8 +195,20 @@
 \keywords{$keywords$}
 $endif$
 
+$if(jnlcitation)$ 
+\jnlcitation{$jnlcitation$} 
+$endif$
+
 \maketitle
 
+$if(abbreviations)$ 
+\renewcommand\thefootnote{}
+\footnotetext{\textbf{Abbreviations:} $for(abbreviations)$$abbreviations$$sep$; $endfor$.}
+
+\renewcommand\thefootnote{\fnsymbol{footnote}}
+\setcounter{footnote}{1}
+$endif$
+
 $body$
 
 $if(bibliography)$