rstudio · cderv · Sep 7, 2021 · Oct 16, 2019 · Oct 17, 2019 · Sep 7, 2021
diff --git a/DESCRIPTION b/DESCRIPTION
@@ -1,7 +1,7 @@
 Package: rticles
 Type: Package
 Title: Article Formats for R Markdown
-Version: 0.20.5
+Version: 0.20.6
 Authors@R: c(
   person("JJ", "Allaire", role = "aut", email = "jj@rstudio.com"),
   person("Yihui", "Xie", role = c("aut", "cre"), email = "xie@yihui.name", comment = c(ORCID = "0000-0003-0645-5666")),
@@ -46,7 +46,8 @@ Authors@R: c(
   person('Jay', 'Hesselberth', role = c('aut', 'ctb'), email = 'jay.hesselberth@gmail.com', comment = c(ORCID = '0000-0002-6299-179X')),
   person("Alfredo", "Hernández", role = c("ctb"), email = "aldomann.designs@gmail.com", comment = c(ORCID = "0000-0002-2660-4545")),
   person("Stefano", "Coretta", role = c("ctb"), email = "stefano.coretta@gmail.com", comment = c(ORCID = "0000-0001-9627-5532", github = "stefanocoretta")),
-  person("Alvaro", "Uzaheta", role = c("ctb"), email = "alvaro.uzaheta@gess.ethz.ch", comment = c(github = "auzaheta"))
+  person("Alvaro", "Uzaheta", role = c("ctb"), email = "alvaro.uzaheta@gess.ethz.ch", comment = c(github = "auzaheta")),
+  person("JooYoung", "Seo", role=c("aut", "cph"), email="jooyoung@psu.edu", comment = c(ORCID = "0000-0002-4064-6012"))
   )
 Description: A suite of custom R Markdown formats and templates for
   authoring journal articles and conference submissions.

diff --git a/NAMESPACE b/NAMESPACE
@@ -20,6 +20,7 @@ export(glossa_article)
 export(ieee_article)
 export(ims_article)
 export(jasa_article)
+export(jedm_article)
 export(joss_article)
 export(journals)
 export(jss_article)

diff --git a/NEWS.md b/NEWS.md
@@ -1,5 +1,7 @@
 # rticles 0.21
 
+- New `jedm_article()` for the Journal of Educational Data Mining template (thanks, @jooyoungseo, #251).
+
 - New `glossa_article()` for articles of [Glossa: a journal of general linguistics](https://www.glossa-journal.org/) (thanks, @stefanocoretta, #361).
 
 - All templates have now the `$highlighting-macros$` variables required for Pandoc highlighting (#435).

diff --git a/R/article.R b/R/article.R
@@ -271,6 +271,18 @@ lipics_article <- function(
   )
 }
 
+#' @section \code{jedm_article}: Format for creating Journal of Educational
+#'   Data Mining (JEDM) articles. Adapted from
+#'   \url{https://jedm.educationaldatamining.org/index.php/JEDM/information/authors}.
+#' @export
+#' @rdname article
+jedm_article <- function(..., keep_tex = TRUE, citation_package = "natbib") {
+  pdf_document_format("jedm",
+                      keep_tex = keep_tex,
+                      citation_package = citation_package,
+                      ...)
+}
+
 #' @section \code{mdpi_article}: Format for creating submissions to
 #'   Multidisciplinary Digital Publishing Institute (MDPI) journals. Adapted
 #'   from \url{https://www.mdpi.com/authors/latex}.

diff --git a/README.md b/README.md
@@ -87,6 +87,7 @@ Currently included templates and their contributors are the following:
 | [IEEE Transaction](http://www.ieee.org/publications_standards/publications/authors/author_templates.html)                                                                         | [@Emaasit](https://github.com/Emaasit), [@espinielli](https://github.com/espinielli), [@nathanweeks](https://github.com/nathanweeks), [@DunLug](https://github.com/DunLug) | [#97](https://github.com/rstudio/rticles/pull/97), [#169](https://github.com/rstudio/rticles/pull/169), [#227](https://github.com/rstudio/rticles/pull/227), [#263](https://github.com/rstudio/rticles/pull/263), [#264](https://github.com/rstudio/rticles/pull/264), [#265](https://github.com/rstudio/rticles/pull/265) | `ieee_article()`           |
 | [IMS: Institute of Mathematical Statistics](https://imstat.org/) [AoAS: Annals of Applied Statistics](https://imstat.org/journals-and-publications/annals-of-applied-statistics/) | [@auzaheta](https://github.com/auzaheta)                                                                                                                                   | [#372](https://github.com/rstudio/rticles/pull/372)                                                                                                                                                                                                                                                                        | `ims_article()`            |
 | [JASA: Journal of the Acoustical Society of America](https://asa.scitation.org/journal/jas)                                                                                       | [@stefanocoretta](https://github.com/stefanocoretta)                                                                                                                       | [#364](https://github.com/rstudio/rticles/pull/364)                                                                                                                                                                                                                                                                        | `jasa_article()`           |
+| [Journal of Educational Data Mining](https://jedm.educationaldatamining.org/index.php/JEDM/about/submissions) journal submissions | [@jooyoungseo](https://github.com/jooyoungseo) | [@251](https://github.com/rstudio/rticles/pull/251) | `jedm_article()` |
 | [JOSS: Journal of Open Source Software](https://joss.theoj.org/) [JOSE: Journal of Open Source Education](https://jose.theoj.org/)                                                | [@noamross](https://github.com/noamross)                                                                                                                                   | [#229](https://github.com/rstudio/rticles/pull/229)                                                                                                                                                                                                                                                                        | `joss_article()`           |
 | [JSS: Journal of Statistical Software](https://www.jstatsoft.org)                                                                                                                 |                                                                                                                                                                            |                                                                                                                                                                                                                                                                                                                            | `jss_article()`            |
 | [LIPIcs](https://www.dagstuhl.de/en/publications/lipics)                                                                                                                          | [@nuest](https://github.com/nuest)                                                                                                                                         | [#288](https://github.com/rstudio/rticles/pull/288)                                                                                                                                                                                                                                                                        | `lipics_article()`         |

diff --git a/inst/rmarkdown/templates/jedm/resources/template.tex b/inst/rmarkdown/templates/jedm/resources/template.tex
@@ -0,0 +1,103 @@
+%----------------------------------------------------------------------------------------
+% The original JEDM LaTeX template has been modified by JooYoung Seo (jooyoung@psu.edu) to work with R Markdown.
+%----------------------------------------------------------------------------------------
+
+\documentclass[notitlepage,12pt]{jedm}
+%\usepackage[sc,sf,small]{titlesec}
+\usepackage[table]{xcolor}
+\usepackage{graphicx}
+\usepackage{url}
+\usepackage{hyperref}
+\hypersetup{
+  colorlinks   = true, %Colours links instead of ugly boxes
+  urlcolor     = blue, %Colour for external hyperlinks
+  linkcolor    = blue, %Colour of internal links
+  citecolor   = blue %Colour of citations
+}
+
+%-----------------------------------------------------------------------
+% FINAL COPYEDITTED SUBMISSION - UNCOMMENT THIS TO SUPPRESS PAGE NUMBERS
+%\pagenumbering{gobble}
+%-----------------------------------------------------------------------
+
+$if(natbib)$
+% \usepackage[$natbiboptions$]{natbib} %Seems to be already defined in the jedm.cls
+\bibliographystyle{$if(biblio-style)$$biblio-style$$else$acmtrans$endif$}
+$endif$
+
+% Pandoc syntax highlighting
+$if(highlighting-macros)$
+$highlighting-macros$
+$endif$
+
+% Pandoc citation processing
+$if(csl-refs)$
+\newlength{\csllabelwidth}
+\setlength{\csllabelwidth}{3em}
+\newlength{\cslhangindent}
+\setlength{\cslhangindent}{1.5em}
+% for Pandoc 2.8 to 2.10.1
+\newenvironment{cslreferences}%
+  {$if(csl-hanging-indent)$\setlength{\parindent}{0pt}%
+  \everypar{\setlength{\hangindent}{\cslhangindent}}\ignorespaces$endif$}%
+  {\par}
+% For Pandoc 2.11+
+\newenvironment{CSLReferences}[2] % #1 hanging-ident, #2 entry spacing
+ {% don't indent paragraphs
+  \setlength{\parindent}{0pt}
+  % turn on hanging indent if param 1 is 1
+  \ifodd #1 \everypar{\setlength{\hangindent}{\cslhangindent}}\ignorespaces\fi
+  % set entry spacing
+  \ifnum #2 > 0
+  \setlength{\parskip}{#2\baselineskip}
+  \fi
+ }%
+ {}
+\usepackage{calc} % for calculating minipage widths
+\newcommand{\CSLBlock}[1]{#1\hfill\break}
+\newcommand{\CSLLeftMargin}[1]{\parbox[t]{\csllabelwidth}{#1}}
+\newcommand{\CSLRightInline}[1]{\parbox[t]{\linewidth - \csllabelwidth}{#1}\break}
+\newcommand{\CSLIndent}[1]{\hspace{\cslhangindent}#1}
+$endif$
+
+$for(header-includes)$
+$header-includes$
+$endfor$
+
+\begin{document}
+
+\title{$title$}
+\date{} %do not delete this, it suppresses insertion of the date
+
+$if(author)$
+\author{$for(author)${\large $author.name$}\\$author.institution$\\$author.email$$sep$ \and $endfor$}
+$endif$
+
+\maketitle
+
+$if(abstract)$
+\begin{abstract}
+$abstract$\\ %Keep \\ for spacing to keywords
+
+$if(keywords)$
+{\parindent0pt
+\textbf{Keywords:} $keywords$
+}
+$endif$
+\end{abstract}
+$endif$
+
+$body$
+
+$if(natbib)$
+$if(bibliography)$
+\bibliography{$for(bibliography)$$bibliography$$sep$,$endfor$}
+$endif$
+$endif$
+
+$for(include-after)$
+$include-after$
+
+$endfor$
+
+\end{document}