From 53ad4e4dcafebfbfffcdeccf726ad04facb21830 Mon Sep 17 00:00:00 2001 From: matthias-da Date: Tue, 7 Sep 2021 17:21:12 +0200 Subject: [PATCH 01/13] ajs journal included --- DESCRIPTION | 6 +- NAMESPACE | 3 +- NEWS.md | 8 +- R/ajs_article.R | 70 + R/article.R | 25 - README.Rmd | 1 + README.md | 2 - .../templates/ajs/resources/template.tex | 124 ++ .../ajs/skeleton/ajs-download20180210.pdf | Bin 0 -> 5390 bytes inst/rmarkdown/templates/ajs/skeleton/ajs.bst | 1634 +++++++++++++++++ inst/rmarkdown/templates/ajs/skeleton/ajs.cls | 523 ++++++ .../rmarkdown/templates/ajs/skeleton/oesg.png | Bin 0 -> 2885 bytes .../templates/ajs/skeleton/skeleton.Rmd | 222 +++ inst/rmarkdown/templates/ajs/template.yaml | 5 + man/ajs_article.Rd | 29 + man/article.Rd | 19 - tests/testit/test-formats.R | 2 +- 17 files changed, 2615 insertions(+), 58 deletions(-) create mode 100644 R/ajs_article.R create mode 100644 inst/rmarkdown/templates/ajs/resources/template.tex create mode 100644 inst/rmarkdown/templates/ajs/skeleton/ajs-download20180210.pdf create mode 100644 inst/rmarkdown/templates/ajs/skeleton/ajs.bst create mode 100644 inst/rmarkdown/templates/ajs/skeleton/ajs.cls create mode 100644 inst/rmarkdown/templates/ajs/skeleton/oesg.png create mode 100644 inst/rmarkdown/templates/ajs/skeleton/skeleton.Rmd create mode 100644 inst/rmarkdown/templates/ajs/template.yaml create mode 100644 man/ajs_article.Rd diff --git a/DESCRIPTION b/DESCRIPTION index 135427816..65fcebad2 100644 --- a/DESCRIPTION +++ b/DESCRIPTION @@ -1,7 +1,7 @@ Package: rticles Type: Package Title: Article Formats for R Markdown -Version: 0.20.6 +Version: 0.20.4 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,8 +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("JooYoung", "Seo", role=c("aut", "cph"), email="jooyoung@psu.edu", comment = c(ORCID = "0000-0002-4064-6012")) + person("Matthias", "Templ", role = c("ctb"), email = "matthias.templ@gmail.com", comment = c(ORCID = "0000-0002-8638-5276", github = "matthias-da")), + person("Alvaro", "Uzaheta", role = c("ctb"), email = "alvaro.uzaheta@gess.ethz.ch", comment = c(github = "auzaheta")) ) Description: A suite of custom R Markdown formats and templates for authoring journal articles and conference submissions. diff --git a/NAMESPACE b/NAMESPACE index 3744bae48..9efa97a72 100644 --- a/NAMESPACE +++ b/NAMESPACE @@ -4,6 +4,7 @@ export(acm_article) export(acs_article) export(aea_article) export(agu_article) +export(ajs_article) export(amq_article) export(ams_article) export(arxiv_article) @@ -16,11 +17,9 @@ export(ctex) export(ctex_article) export(elsevier_article) export(frontiers_article) -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 index f106c4bef..3363e2a85 100644 --- a/NEWS.md +++ b/NEWS.md @@ -1,9 +1,5 @@ # 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). - Template for `tf_article()` gains a `classoption` variable (thanks, @statzhero, #434). @@ -14,11 +10,11 @@ - `bioinformatics_article()` now separates `manuscript_type` (e.g., Applications note, Original article) and `subject_section` (e.g. Genome analysis, Phylogenetics) in template and skeleton (thanks, @stephenturner, #415) -- Update Copernicus Publications template to version 6.3 from 2021-07-08 (thanks, @RLumSK, #432). +- Add article template `ajs_article()` for *Austrian Journal of Statistics* (thanks, @matthias-da) # rticles 0.20 -- `lipics_article()` skeleton now sets option `bookdown.theorem.preamble` to FALSE to work with `bookdown::pdf_book()` and avoid conflicts in theorem environment definition. This requires **bookdown** 0.23 or higher (#392). +- `lipics_article()` skeleton now sets option `bookdown.theorem.preamble` to FALSE to work with `bookdown::pdf_book()` and avoid conflicst in theorem environment definition. This requires **bookdown** 0.23 or higher (#392). - `oup_article()` template now largely compatible to that of `elsevier_article()` (thanks, @dmkaplan2000, #403) diff --git a/R/ajs_article.R b/R/ajs_article.R new file mode 100644 index 000000000..7991c9fc2 --- /dev/null +++ b/R/ajs_article.R @@ -0,0 +1,70 @@ +#' Austrian Journal of Statistics (AJS) format. +#' +#' Format for creating a Austrian Journal of Statistics (AJS) article. Adapted +#' from \url{https://www.jstatsoft.org/about/submissions}. +#' @inheritParams rmarkdown::pdf_document +#' @param ... Arguments to \code{rmarkdown::pdf_document} +#' @export +ajs_article <- function( + ..., keep_tex = TRUE, citation_package = 'natbib', + pandoc_args = NULL +) { + + rmarkdown::pandoc_available('2.2', TRUE) + + pandoc_args <- c( + pandoc_args, + "--lua-filter", pkg_file("rmarkdown", "lua", "short-title.lua") + ) + + base <- pdf_document_format( + "ajs", keep_tex = keep_tex, citation_package = citation_package, + pandoc_args = pandoc_args, ... + ) + + # Mostly copied from knitr::render_sweave + base$knitr$opts_knit$out.format <- "sweave" + + base$knitr$opts_chunk <- merge_list(base$knitr$opts_chunk, list( + prompt = TRUE, comment = NA, highlight = FALSE, tidy = FALSE, + dev.args = list(pointsize = 11), fig.align = "center", + R.options = list(prompt = 'R> ', continue = '+ '), + fig.width = 4.9, # 6.125" * 0.8, as in template + fig.height = 3.675 # 4.9 * 3:4 + )) + + base$pandoc$ext <- '.tex' + post <- base$post_processor + # a hack for https://github.com/rstudio/rticles/issues/100 to add \AND to the author list + base$post_processor <- function(metadata, input, output, clean, verbose) { + if (is.function(post)) output = post(metadata, input, output, clean, verbose) + f <- xfun::with_ext(output, '.tex') + x <- xfun::read_utf8(f) + x <- gsub('(\\\\AND )\\\\And ', '\\1', x) + x <- gsub(' \\\\AND(\\\\\\\\)$', '\\1', x) + xfun::write_utf8(x, f) + tinytex::latexmk( + f, base$pandoc$latex_engine, + if ('--biblatex' %in% base$pandoc$args) 'biber' else 'bibtex' + ) + } + + set_sweave_hooks(base, c('CodeInput', 'CodeOutput', 'CodeChunk')) +} + +# wrap the content in a raw latex block +latex_block <- function(hook) { + force(hook) + function(x, options) { + x2 <- hook(x, options) + if (identical(x, x2)) x else paste0('```{=latex}\n', x2, '\n```') + } +} + +# use knitr's sweave hooks, but wrap chunk output in raw latex blocks +set_sweave_hooks <- function(base, ...) { + hooks <- knitr::hooks_sweave(...) + hooks[['chunk']] <- latex_block(hooks[['chunk']]) + base$knitr$knit_hooks <- merge_list(base$knitr$knit_hooks, hooks) + base +} diff --git a/R/article.R b/R/article.R index 16c4be0f2..92ee651a3 100644 --- a/R/article.R +++ b/R/article.R @@ -176,19 +176,6 @@ frontiers_article <- function(..., keep_tex = TRUE) { pdf_document_format("frontiers", keep_tex = keep_tex, ...) } - -#' @section \code{glossa_article}: Format for creating submissions to Glossa: a -#' journal of general linguistics. Author Guidelines are available on -#' \href{https://www.glossa-journal.org/site/author-guidelines/}{www.glossa-journal.org}. -#' Template is adapted from \url{https://github.com/guidovw/Glossalatex}. -#' @export -#' @rdname article -glossa_article <- function(..., keep_tex = TRUE, latex_engine = "xelatex") { - pdf_document_format( - "glossa", keep_tex = keep_tex, latex_engine = latex_engine, ... - ) -} - #' @param journal one of \code{"aoas"}, \code{"aap"}, \code{"aop"}, \code{"aos"}, \code{"sts"} for \code{ims_article} #' @section \code{ims_article}: Format for creating submissions to the Institute of Mathematical Statistics #' \href{https://imstat.org/}{IMS} journals and publications. Adapted from @@ -271,18 +258,6 @@ 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.Rmd b/README.Rmd index 7829cce1d..cc00b57b4 100644 --- a/README.Rmd +++ b/README.Rmd @@ -47,6 +47,7 @@ Currently included templates and their contributors are the following: | [ACS](https://pubs.acs.org) | [\@yufree](https://github.com/yufree)| [\#15](https://github.com/rstudio/rticles/pull/15) | `acs_article()`| | [AEA: American Economic Association](https://www.aeaweb.org/journals/policies/templates)| [\@sboysel](https://github.com/sboysel)| [\#86](https://github.com/rstudio/rticles/pull/86) | `aea_articles()` | | [AGU](https://agupubs.onlinelibrary.wiley.com/) | [\@eliocamp](https://github.com/eliocamp)| [\#199](https://github.com/rstudio/rticles/pull/99)| `agu_article()`| +| [AJS: Austrian Journal of Statistics](https://www.ajs.or.at ||| `ajs_article()`| | [AMS: American Meteorological Society](https://www.ametsoc.org/)| [\@yufree](https://github.com/yufree)| [\#96](https://github.com/rstudio/rticles/pull/96) | `ams_article()`| | [ASA: American Statistical Association](https://www.amstat.org/)|| [\#111](https://github.com/rstudio/rticles/pull/111) | `asa_article()`| | [arXiv](https://arxiv.org/) pre-prints based on George Kour's template| [\@alexpghayes](https://github.com)| [\#236](https://github.com/rstudio/rticles/pull/236) | `arxiv_article()`| diff --git a/README.md b/README.md index a603033c0..7476e1e77 100644 --- a/README.md +++ b/README.md @@ -83,11 +83,9 @@ Currently included templates and their contributors are the following: | [CTeX](https://ctan.org/pkg/ctex) | | | `ctex()` | | [Elsevier](https://www.elsevier.com) | [@cboettig](https://github.com/cboettig) | [#27](https://github.com/rstudio/rticles/pull/27) | `elsevier_article()` | | [Frontiers](https://www.frontiersin.org/) | [@muschellij2](https://github.com/muschellij2) | [#211](https://github.com/rstudio/rticles/pull/211) | `frontiers_article()` | -| [Glossa](https://www.glossa-journal.org) | [@stefanocoretta](https://github.com/stefanocoretta) | [#361](https://github.com/rstudio/rticles/pull/361) | `glossa_article()` | | [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/ajs/resources/template.tex b/inst/rmarkdown/templates/ajs/resources/template.tex new file mode 100644 index 000000000..d2af69891 --- /dev/null +++ b/inst/rmarkdown/templates/ajs/resources/template.tex @@ -0,0 +1,124 @@ +\documentclass[ +$for(classoption)$ + $classoption$$sep$, +$endfor$ +]{$documentclass$} + +\usepackage[utf8]{inputenc} + +\providecommand{\tightlist}{% + \setlength{\itemsep}{0pt}\setlength{\parskip}{0pt}} + +\author{ +$for(author)$$author.name$\\$author.affiliation$$sep$ \And $endfor$ +} +\title{$title.formatted$} + +\Plainauthor{$for(author)$$author.name$$sep$, $endfor$} +$if(title.plain)$ +\Plaintitle{$title.plain$} +$endif$ +$if(title.short)$ +\Shorttitle{$title.short$} +$endif$ + + +\Abstract{ +$abstract$ +} + +$if(keywords.formatted)$ +\Keywords{$for(keywords.formatted)$$keywords.formatted$$sep$, $endfor$} +$endif$ +$if(keywords.plain)$ +\Plainkeywords{$for(keywords.plain)$$keywords.plain$$sep$, $endfor$} +$endif$ + +%% publication information +%% \Volume{50} +%% \Issue{9} +%% \Month{June} +%% \Year{2012} +%% \Submitdate{$submitdate$} +%% \Acceptdate{2012-06-04} + +\Address{ +$for(author)$ + $if(author.address)$ + $author.name$\\ + $if(author.affiliation2)$ + $author.affiliation2$\\ + $else$ + $author.affiliation$\\ + $endif$ + $author.address$\\ + $if(author.email)$E-mail: $author.email$\\$endif$ + $if(author.url)$URL: $author.url$\\~\\$endif$ + $endif$ +$endfor$ +} + +% 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$ + +$preamble$ + +\begin{document} + +$body$ + +$if(natbib)$ +$if(bibliography)$ +$if(biblio-title)$ +$if(book-class)$ +\renewcommand\bibname{$biblio-title$} +$else$ +\renewcommand\refname{$biblio-title$} +$endif$ +$endif$ +\bibliography{$for(bibliography)$$bibliography$$sep$,$endfor$} +$endif$ +$endif$ + +$if(biblatex)$ +\printbibliography$if(biblio-title)$[title=$biblio-title$]$endif$ +$endif$ + +\end{document} + diff --git a/inst/rmarkdown/templates/ajs/skeleton/ajs-download20180210.pdf b/inst/rmarkdown/templates/ajs/skeleton/ajs-download20180210.pdf new file mode 100644 index 0000000000000000000000000000000000000000..8c2299cdf205276d7ad249ec98e8f4e292daf2f8 GIT binary patch literal 5390 zcmb7Ic|4T;*PbXc%D!ZY$zEa1*t3Q#A!~Lr#$am9Xcqg}_pMM$StGPa_AMgWvM&iK zLe@~W7?t-P&(rgJe$Vs1f4uY8eP7@6J?GqKKA&@)bBUVj=t{w)<-nq$)1fn=eW61R zcrXki1Hrjm1*@upq1t#9f{4apbr3`pL_+5rTn45j1Bbz3va&Eaxzk{%G0ye>JhMa- zF~BWzh#nr{<$*>LASNWD7l{a5GsWXvNk|l)dMYa|Ck+FzgIG8!bQ-L#4n|>Jsae4P z$_4_p^z%YNpxOu`0)umhKurP{L)_4?__@_Bk8;2zVuLOwF z!F8xPihv{Gk$^wBfB2&s{4R$P3hPevfB;`F4}t2UF+|`Cpt=~KI65dK&J{(?n?M9= z<_Y%Acxa=HJE_RB`rZ2ZE$~1_xOH;dC5|Rd8j+w7#`hPd^H@aqO2PX-16vwuQaLgKj7P!XDy0du(G`uej`o-H73^+CA3-m8dgW0n~#EqelJtigYa3 z^(}tIRPHj_bk>#{SxMLS9Gf#LEn42k3_8TePjIa-ynU!XQi#g8@!C##un=A+bDmBz|L5#Mh8GIW!CTMT+H z5cN7=DQdrC^YW~7^X?P1$8V1z0+TbV52qiJb)j6v>N{i4B)-&wJr%DR+l)Ome*VQ0 z_b1=i1LkV?g3R(C1|7>X%DOBt@9k8|9~&#_)B1Z7>B`wC5ty^I> z&K$oO5(_X%Lk&u6^BD+<2by{(f`jg5Ilf9=-Rvw?Az$dd+c{eCLnwkNH>BnI`eIwA zV|M)zXPU{C!Yh|IaHotlo^f^)TBui5f{S)TlV4gUkyb!zd$%U#SnklyhK3f$D(>%2TDc8u5I%2J! zf`nU+ax}+)au6`n8MEVO_~H^&%#N)QhCqt@F`#;u5JL}4Tbu#N)rC9K|D^1pj%b1K ztM#3_he2mTYw3QXi+GQW@*d+_a+W&!JR$iFYm=O1B6xFTG~;g6gPf26Ip(Lu%)G22 z0vD3$TUztI%V%D-a5G1meF`e&d;VcZm?lJI0rfPp2q|{UwTGtA*?Ko5L}{{7H6xZa z5exGWS?1L}oO9*qNR^0TH0vSF6bJhgp~b>9{pWM5S+IoO7*NGh2SR#4>=ElB57IRn zIl3pnQzb7yBTH=5VG+L9m<7{obE}NLv!MN{c8*a!B!dFSTA#v;E9*}MA9}LkZlw46 zT1ERa5K<0X;AB^#?L)7#*)iUB8*=e|g>@K{!0Nt#C2MN#OYvrCefFV>JViY1*YMbP zifG*9=NaHb;l0079G*B{MGpQL?1^71riDMlY>+fOs|Tuzu`^qU@sIDS7b!BBwdMC- z(`u8&-bCdvY-=ld!NX*8r|zZzcfA- z)ZP8qQ8)}4TTs-1`iITs@|m7~F)O_2v+?Z|gX)b2dWLTXY{Oz-RoDhoMMSQyu`sc% ze<<_izeUDrec>(7*# z^|i&HjZYwY~q*et-A>KiWRj5ba8U*h8r8-W=ix&;pJGw09T;YK(G4BeZb75PKQmOhHZw zA}=H7_&0{2cKF{N9Uvm41&RouEvcf1Ce@ov08swmsB9TU!f3K)FH` zs8)`@`HuSb`+Lt*2?k3I0@Xozqmd}8Q|Kjt!=QgM5nNtb;eTZ!YEFMKQD&NtrNtOm zbYFvFgJ}v&+^zm=9_BRq#~bvMrO&_^SS~i*1PLkVSbFK0B^MlpOH762X(yKo#YG-6 zD_uU!qceQni-RxCz_plX@`c}8&;3ck??KnH8~Q%DuaQUUKsSGcA9-bD!w_;T*M{TM zd}~Z%yt^~~p<`b`v>4EoS9!S>*N!etI!)kc0w$e(hr6MU39`F)W=JEU8ML2$tJYQs z1~R>yFu%St=D@?aQosMEw-hfA_@^le; zr%_*LC&XtGmDw5-lAU?D=a25x!W+eq;Y5Qd%{JU@DNo=f1&~C_g!CN2!WAQhOp$w?^boa4$F}L=1+ex#D6vps~Iaov`rn1L>>gzL}k8kakVNy&Ko`#L4 z^Vsr#!h_uUe%NyOdGeGAsf;QqE6I3Dc{WN62Rr__pYq*1%_$;yl}AT#r)AqZDE&C- zc>$_&j1ujM<^(w|A2O}~8QtRy1;v#$l9m?P<0QJOp1_jZ_De&vtVrp1o$u=c0f&^$cFs~IE!k~qT(VF++N z+rLI;Y}2FN?TH^qzni(&7xs&6U1RjCgG(eh38|+8uVFLm{c`Vz9gQ3WbU~ALNt17Z zmc8k4RTFCshZ=DbAA;p@(@sW6V4hjbv^93hoCCvJrmJBt_5k#bn&!WFzu5JQnu za!T~lpbS$IOF`!s$;hEW=RHZ1x#)^iWyWmvgh>1rkWiZHOAdUBI3p9ZZt zep4V{ur^LVxv;~YgYLown5oe%#y5hTk<$;-a;v5`~j4JQtY&OF9v3#4pBKPE*cP&Nq~#9Ldv` zfG8-nd3tVye>v`WEB?6)237?QU`AywAT1*vo1iRehe^Y_OSVf& z$F*e(j`W+OA6DQz!YfX5#>Hh`thktUG4aiH&eJDz`37hg7B}G(1cgLVxh!?r7C=*{5c!Ea&6v>|=KTlE` zC>C_*=uXicp)01VKK?CAvW26?G3sYjNn%2xOM=1)5|0|(N|s5cR}m}Ucuh;;x}vSy zpfkRQ1NjDSEc?OJf9#k-xuPNL35*XO-E*@0$XtC-v{XOWB`&Rax_CY#wxQJY77QxM zZcr**iczXwGTWBNrq$lFe5sn^;fc${e()f-N4cw+Ase&;%PO9r;EV-v&l{x@G!ksrV@u zd!L)z92sl2{Sr93%gtS2c+W7tE6=ZOV`qbRKCyPG7Vog^_z-)nTBo`JYwqLdlN1oX zN6SoR&eBV5k0^ZP{&@a;pS#nDlTZm$$vceu_QmbfxYzId>R$)+M^CeVwpbxdTK6fA zRloIl)Atb+mmUg5>s6nVp zXiXMtdju z?sZFj)&hn-c%|$HJi5HQJgz*yE91_JgMuiSO&+B^7GGB1DmT_Q9P(PH%n5#PCe0#s zLrn49cl|7UmJH6hc5L0aOMIQY@zN>OuGw+GKF9ufl{4|-{2R*U{>KlW_**ZRNZYA3 zw&8k0DX=M5RMDrEfOsde1B(UtL1!jz>Vig6=e4v zM^F07ynOa0hmXo{Zx4#DBrOZ5^ZHg)w?8bL3Fun;E;yuSMR54+JI3%T_5pkLrMc`3 z_1mPS#l_hnWP_pqT1KoIp&0rC_Z8DWwlN>rm$~@;i-zCFtskX~z1&Gou8v>oX1yK} znu2m>==TKA(Ve7IiRO>4gQ_^L@?>ci-e$Ay z^kU)EE}}J}S7$@`y-yd)pP8IoI4x2xQ zO734NdO5m3xQbdMj&A<6<|%P=y7R&;m@p-^?73fm*N0uUcCB>ntj67-h20aI-&P9~ zOtOP$zejBB{cG%2{%Z^c|0%m%zyb;f8Vl$y)UowHZ`Nq+c`O0_8vsLf&~9!hKx?6j zDfSRKd8j8EOCms&6`!NVe}?~q{o()N6aIIf`Y4Pyiik!c zz|h~dhEV^dziVH6y)UrxylXl7X}B`80rs#{R@LB0DIPdV=x6} z!2LfkMI}Iw`v;~h1MDpS#AN?5(2eA`=fvwK%fR#Hyp4L9;|QXI2;i|6%!BYMIa*Z#Di+d%P7LZqM{c} Hbiw}vLEc3~ literal 0 HcmV?d00001 diff --git a/inst/rmarkdown/templates/ajs/skeleton/ajs.bst b/inst/rmarkdown/templates/ajs/skeleton/ajs.bst new file mode 100644 index 000000000..84614348b --- /dev/null +++ b/inst/rmarkdown/templates/ajs/skeleton/ajs.bst @@ -0,0 +1,1634 @@ +%% +%% This is file `ajs.bst', +%% based on jss.bst from www.jstatsoft.org by +%% Achim Zeileis and +%% generated with the docstrip utility. +%% +%% The original source files were: +%% +%% merlin.mbs (with options: `ay,nat,nm-rvx,keyxyr,dt-beg,yr-par,note-yr,tit-qq,atit-u,trnum-it,vol-bf,volp-com,num-xser,pre-edn,isbn,issn,edpar,pp,ed,xedn,xand,etal-it,revdata,eprint,url,url-blk,doi,nfss') +%% +%% ** BibTeX style file for AJS publications (based on +%% the jss style files on http://www.jstatsoft.org/) +%% +%% Copyright 1994-2007 Patrick W Daly +%% License: GPL-2 + % =============================================================== + % IMPORTANT NOTICE: + % This bibliographic style (bst) file has been generated from one or + % more master bibliographic style (mbs) files, listed above, provided + % with kind permission of Patrick W Daly. + % + % This generated file can be redistributed and/or modified under the terms + % of the General Public License (Version 2). + % =============================================================== + % Name and version information of the main mbs file: + % \ProvidesFile{merlin.mbs}[2007/04/24 4.20 (PWD, AO, DPC)] + % For use with BibTeX version 0.99a or later + %------------------------------------------------------------------- + % This bibliography style file is intended for texts in ENGLISH + % This is an author-year citation style bibliography. As such, it is + % non-standard LaTeX, and requires a special package file to function properly. + % Such a package is natbib.sty by Patrick W. Daly + % The form of the \bibitem entries is + % \bibitem[Jones et al.(1990)]{key}... + % \bibitem[Jones et al.(1990)Jones, Baker, and Smith]{key}... + % The essential feature is that the label (the part in brackets) consists + % of the author names, as they should appear in the citation, with the year + % in parentheses following. There must be no space before the opening + % parenthesis! + % With natbib v5.3, a full list of authors may also follow the year. + % In natbib.sty, it is possible to define the type of enclosures that is + % really wanted (brackets or parentheses), but in either case, there must + % be parentheses in the label. + % The \cite command functions as follows: + % \citet{key} ==>> Jones et al. (1990) + % \citet*{key} ==>> Jones, Baker, and Smith (1990) + % \citep{key} ==>> (Jones et al., 1990) + % \citep*{key} ==>> (Jones, Baker, and Smith, 1990) + % \citep[chap. 2]{key} ==>> (Jones et al., 1990, chap. 2) + % \citep[e.g.][]{key} ==>> (e.g. Jones et al., 1990) + % \citep[e.g.][p. 32]{key} ==>> (e.g. Jones et al., p. 32) + % \citeauthor{key} ==>> Jones et al. + % \citeauthor*{key} ==>> Jones, Baker, and Smith + % \citeyear{key} ==>> 1990 + %--------------------------------------------------------------------- + +ENTRY + { address + archive + author + booktitle + chapter + collaboration + doi + edition + editor + eid + eprint + howpublished + institution + isbn + issn + journal + key + month + note + number + numpages + organization + pages + publisher + school + series + title + type + url + volume + year + } + {} + { label extra.label sort.label short.list } +INTEGERS { output.state before.all mid.sentence after.sentence after.block } +FUNCTION {init.state.consts} +{ #0 'before.all := + #1 'mid.sentence := + #2 'after.sentence := + #3 'after.block := +} +STRINGS { s t} +FUNCTION {output.nonnull} +{ 's := + output.state mid.sentence = + { ", " * write$ } + { output.state after.block = + { add.period$ write$ + newline$ + "\newblock " write$ + } + { output.state before.all = + 'write$ + { add.period$ " " * write$ } + if$ + } + if$ + mid.sentence 'output.state := + } + if$ + s +} +FUNCTION {output} +{ duplicate$ empty$ + 'pop$ + 'output.nonnull + if$ +} +FUNCTION {output.check} +{ 't := + duplicate$ empty$ + { pop$ "empty " t * " in " * cite$ * warning$ } + 'output.nonnull + if$ +} +FUNCTION {fin.entry} +{ add.period$ + write$ + newline$ +} + +FUNCTION {new.block} +{ output.state before.all = + 'skip$ + { after.block 'output.state := } + if$ +} +FUNCTION {new.sentence} +{ output.state after.block = + 'skip$ + { output.state before.all = + 'skip$ + { after.sentence 'output.state := } + if$ + } + if$ +} +FUNCTION {add.blank} +{ " " * before.all 'output.state := +} + +FUNCTION {date.block} +{ + new.block +} + +FUNCTION {not} +{ { #0 } + { #1 } + if$ +} +FUNCTION {and} +{ 'skip$ + { pop$ #0 } + if$ +} +FUNCTION {or} +{ { pop$ #1 } + 'skip$ + if$ +} +FUNCTION {non.stop} +{ duplicate$ + "}" * add.period$ + #-1 #1 substring$ "." = +} + +STRINGS {z} +FUNCTION {remove.dots} +{ 'z := + "" + { z empty$ not } + { z #1 #1 substring$ + z #2 global.max$ substring$ 'z := + duplicate$ "." = 'pop$ + { * } + if$ + } + while$ +} +FUNCTION {new.block.checkb} +{ empty$ + swap$ empty$ + and + 'skip$ + 'new.block + if$ +} +FUNCTION {field.or.null} +{ duplicate$ empty$ + { pop$ "" } + 'skip$ + if$ +} +FUNCTION {emphasize} +{ duplicate$ empty$ + { pop$ "" } + { "\emph{" swap$ * "}" * } + if$ +} +FUNCTION {bolden} +{ duplicate$ empty$ + { pop$ "" } + { "\textbf{" swap$ * "}" * } + if$ +} +FUNCTION {tie.or.space.prefix} +{ duplicate$ text.length$ #3 < + { "~" } + { " " } + if$ + swap$ +} + +FUNCTION {capitalize} +{ "u" change.case$ "t" change.case$ } + +FUNCTION {space.word} +{ " " swap$ * " " * } + % Here are the language-specific definitions for explicit words. + % Each function has a name bbl.xxx where xxx is the English word. + % The language selected here is ENGLISH +FUNCTION {bbl.and} +{ "and"} + +FUNCTION {bbl.etal} +{ "et~al." } + +FUNCTION {bbl.editors} +{ "eds." } + +FUNCTION {bbl.editor} +{ "ed." } + +FUNCTION {bbl.edby} +{ "edited by" } + +FUNCTION {bbl.edition} +{ "edition" } + +FUNCTION {bbl.volume} +{ "volume" } + +FUNCTION {bbl.of} +{ "of" } + +FUNCTION {bbl.number} +{ "number" } + +FUNCTION {bbl.nr} +{ "no." } + +FUNCTION {bbl.in} +{ "in" } + +FUNCTION {bbl.pages} +{ "pp." } + +FUNCTION {bbl.page} +{ "p." } + +FUNCTION {bbl.eidpp} +{ "pages" } + +FUNCTION {bbl.chapter} +{ "chapter" } + +FUNCTION {bbl.techrep} +{ "Technical Report" } + +FUNCTION {bbl.mthesis} +{ "Master's thesis" } + +FUNCTION {bbl.phdthesis} +{ "Ph.D. thesis" } + +MACRO {jan} {"January"} + +MACRO {feb} {"February"} + +MACRO {mar} {"March"} + +MACRO {apr} {"April"} + +MACRO {may} {"May"} + +MACRO {jun} {"June"} + +MACRO {jul} {"July"} + +MACRO {aug} {"August"} + +MACRO {sep} {"September"} + +MACRO {oct} {"October"} + +MACRO {nov} {"November"} + +MACRO {dec} {"December"} + +MACRO {acmcs} {"ACM Computing Surveys"} + +MACRO {acta} {"Acta Informatica"} + +MACRO {cacm} {"Communications of the ACM"} + +MACRO {ibmjrd} {"IBM Journal of Research and Development"} + +MACRO {ibmsj} {"IBM Systems Journal"} + +MACRO {ieeese} {"IEEE Transactions on Software Engineering"} + +MACRO {ieeetc} {"IEEE Transactions on Computers"} + +MACRO {ieeetcad} + {"IEEE Transactions on Computer-Aided Design of Integrated Circuits"} + +MACRO {ipl} {"Information Processing Letters"} + +MACRO {jacm} {"Journal of the ACM"} + +MACRO {jcss} {"Journal of Computer and System Sciences"} + +MACRO {scp} {"Science of Computer Programming"} + +MACRO {sicomp} {"SIAM Journal on Computing"} + +MACRO {tocs} {"ACM Transactions on Computer Systems"} + +MACRO {tods} {"ACM Transactions on Database Systems"} + +MACRO {tog} {"ACM Transactions on Graphics"} + +MACRO {toms} {"ACM Transactions on Mathematical Software"} + +MACRO {toois} {"ACM Transactions on Office Information Systems"} + +MACRO {toplas} {"ACM Transactions on Programming Languages and Systems"} + +MACRO {tcs} {"Theoretical Computer Science"} +FUNCTION {bibinfo.check} +{ swap$ + duplicate$ missing$ + { + pop$ pop$ + "" + } + { duplicate$ empty$ + { + swap$ pop$ + } + { swap$ + pop$ + } + if$ + } + if$ +} +FUNCTION {bibinfo.warn} +{ swap$ + duplicate$ missing$ + { + swap$ "missing " swap$ * " in " * cite$ * warning$ pop$ + "" + } + { duplicate$ empty$ + { + swap$ "empty " swap$ * " in " * cite$ * warning$ + } + { swap$ + pop$ + } + if$ + } + if$ +} +FUNCTION {format.eprint} +{ eprint duplicate$ empty$ + 'skip$ + { "\eprint" + archive empty$ + 'skip$ + { "[" * archive * "]" * } + if$ + "{" * swap$ * "}" * + } + if$ +} +FUNCTION {format.url} +{ url empty$ + { "" } + { "\urlprefix\url{" url * "}" * } + if$ +} + +INTEGERS { nameptr namesleft numnames } + + +STRINGS { bibinfo} + +FUNCTION {format.names} +{ 'bibinfo := + duplicate$ empty$ 'skip$ { + 's := + "" 't := + #1 'nameptr := + s num.names$ 'numnames := + numnames 'namesleft := + { namesleft #0 > } + { s nameptr + "{vv~}{ll}{ jj}{ f{}}" + format.name$ + remove.dots + bibinfo bibinfo.check + 't := + nameptr #1 > + { + namesleft #1 > + { ", " * t * } + { + s nameptr "{ll}" format.name$ duplicate$ "others" = + { 't := } + { pop$ } + if$ + "," * + t "others" = + { + " " * bbl.etal emphasize * + } + { " " * t * } + if$ + } + if$ + } + 't + if$ + nameptr #1 + 'nameptr := + namesleft #1 - 'namesleft := + } + while$ + } if$ +} +FUNCTION {format.names.ed} +{ + 'bibinfo := + duplicate$ empty$ 'skip$ { + 's := + "" 't := + #1 'nameptr := + s num.names$ 'numnames := + numnames 'namesleft := + { namesleft #0 > } + { s nameptr + "{f{}~}{vv~}{ll}{ jj}" + format.name$ + remove.dots + bibinfo bibinfo.check + 't := + nameptr #1 > + { + namesleft #1 > + { ", " * t * } + { + s nameptr "{ll}" format.name$ duplicate$ "others" = + { 't := } + { pop$ } + if$ + "," * + t "others" = + { + + " " * bbl.etal emphasize * + } + { " " * t * } + if$ + } + if$ + } + 't + if$ + nameptr #1 + 'nameptr := + namesleft #1 - 'namesleft := + } + while$ + } if$ +} +FUNCTION {format.key} +{ empty$ + { key field.or.null } + { "" } + if$ +} + +FUNCTION {format.authors} +{ author "author" format.names + duplicate$ empty$ 'skip$ + { collaboration "collaboration" bibinfo.check + duplicate$ empty$ 'skip$ + { " (" swap$ * ")" * } + if$ + * + } + if$ +} +FUNCTION {get.bbl.editor} +{ editor num.names$ #1 > 'bbl.editors 'bbl.editor if$ } + +FUNCTION {format.editors} +{ editor "editor" format.names duplicate$ empty$ 'skip$ + { + " " * + get.bbl.editor + "(" swap$ * ")" * + * + } + if$ +} +FUNCTION {format.isbn} +{ isbn "isbn" bibinfo.check + duplicate$ empty$ 'skip$ + { + new.block + "ISBN " swap$ * + } + if$ +} + +FUNCTION {format.issn} +{ issn "issn" bibinfo.check + duplicate$ empty$ 'skip$ + { + new.block + "ISSN " swap$ * + } + if$ +} + +FUNCTION {format.doi} +{ doi "doi" bibinfo.check + duplicate$ empty$ 'skip$ + { + new.block + "\doi{" swap$ * "}" * + } + if$ +} +FUNCTION {format.note} +{ + note empty$ + { "" } + { note #1 #1 substring$ + duplicate$ "{" = + 'skip$ + { output.state mid.sentence = + { "l" } + { "u" } + if$ + change.case$ + } + if$ + note #2 global.max$ substring$ * "note" bibinfo.check + } + if$ +} + +FUNCTION {format.title} +{ title + "title" bibinfo.check + duplicate$ empty$ 'skip$ + { + "\enquote{" swap$ * + add.period$ "}" * + } + if$ +} +FUNCTION {format.full.names} +{'s := + "" 't := + #1 'nameptr := + s num.names$ 'numnames := + numnames 'namesleft := + { namesleft #0 > } + { s nameptr + "{vv~}{ll}" format.name$ + 't := + nameptr #1 > + { + namesleft #1 > + { ", " * t * } + { + s nameptr "{ll}" format.name$ duplicate$ "others" = + { 't := } + { pop$ } + if$ + t "others" = + { + " " * bbl.etal emphasize * + } + { + numnames #2 > + { "," * } + 'skip$ + if$ + bbl.and + space.word * t * + } + if$ + } + if$ + } + 't + if$ + nameptr #1 + 'nameptr := + namesleft #1 - 'namesleft := + } + while$ +} + +FUNCTION {author.editor.key.full} +{ author empty$ + { editor empty$ + { key empty$ + { cite$ #1 #3 substring$ } + 'key + if$ + } + { editor format.full.names } + if$ + } + { author format.full.names } + if$ +} + +FUNCTION {author.key.full} +{ author empty$ + { key empty$ + { cite$ #1 #3 substring$ } + 'key + if$ + } + { author format.full.names } + if$ +} + +FUNCTION {editor.key.full} +{ editor empty$ + { key empty$ + { cite$ #1 #3 substring$ } + 'key + if$ + } + { editor format.full.names } + if$ +} + +FUNCTION {make.full.names} +{ type$ "book" = + type$ "inbook" = + or + 'author.editor.key.full + { type$ "proceedings" = + 'editor.key.full + 'author.key.full + if$ + } + if$ +} + +FUNCTION {output.bibitem} +{ newline$ + "\bibitem[{" write$ + label write$ + ")" make.full.names duplicate$ short.list = + { pop$ } + { * } + if$ + "}]{" * write$ + cite$ write$ + "}" write$ + newline$ + "" + before.all 'output.state := +} + +FUNCTION {n.dashify} +{ + 't := + "" + { t empty$ not } + { t #1 #1 substring$ "-" = + { t #1 #2 substring$ "--" = not + { "--" * + t #2 global.max$ substring$ 't := + } + { { t #1 #1 substring$ "-" = } + { "-" * + t #2 global.max$ substring$ 't := + } + while$ + } + if$ + } + { t #1 #1 substring$ * + t #2 global.max$ substring$ 't := + } + if$ + } + while$ +} + +FUNCTION {word.in} +{ bbl.in capitalize + " " * } + +FUNCTION {format.date} +{ year "year" bibinfo.check duplicate$ empty$ + { + "empty year in " cite$ * "; set to ????" * warning$ + pop$ "????" + } + 'skip$ + if$ + extra.label * + before.all 'output.state := + " (" swap$ * ")" * +} +FUNCTION {format.btitle} +{ title "title" bibinfo.check + duplicate$ empty$ 'skip$ + { + emphasize + } + if$ +} +FUNCTION {either.or.check} +{ empty$ + 'pop$ + { "can't use both " swap$ * " fields in " * cite$ * warning$ } + if$ +} +FUNCTION {format.bvolume} +{ volume empty$ + { "" } + { bbl.volume volume tie.or.space.prefix + "volume" bibinfo.check * * + series "series" bibinfo.check + duplicate$ empty$ 'pop$ + { swap$ bbl.of space.word * swap$ + emphasize * } + if$ + "volume and number" number either.or.check + } + if$ +} +FUNCTION {format.number.series} +{ volume empty$ + { number empty$ + { series field.or.null } + { series empty$ + { number "number" bibinfo.check } + { output.state mid.sentence = + { bbl.number } + { bbl.number capitalize } + if$ + number tie.or.space.prefix "number" bibinfo.check * * + bbl.in space.word * + series "series" bibinfo.check * + } + if$ + } + if$ + } + { "" } + if$ +} + +FUNCTION {format.edition} +{ edition duplicate$ empty$ 'skip$ + { + output.state mid.sentence = + { "l" } + { "t" } + if$ change.case$ + "edition" bibinfo.check + " " * bbl.edition * + } + if$ +} +INTEGERS { multiresult } +FUNCTION {multi.page.check} +{ 't := + #0 'multiresult := + { multiresult not + t empty$ not + and + } + { t #1 #1 substring$ + duplicate$ "-" = + swap$ duplicate$ "," = + swap$ "+" = + or or + { #1 'multiresult := } + { t #2 global.max$ substring$ 't := } + if$ + } + while$ + multiresult +} +FUNCTION {format.pages} +{ pages duplicate$ empty$ 'skip$ + { duplicate$ multi.page.check + { + bbl.pages swap$ + n.dashify + } + { + bbl.page swap$ + } + if$ + tie.or.space.prefix + "pages" bibinfo.check + * * + } + if$ +} +FUNCTION {format.journal.pages} +{ pages duplicate$ empty$ 'pop$ + { swap$ duplicate$ empty$ + { pop$ pop$ format.pages } + { + ", " * + swap$ + n.dashify + "pages" bibinfo.check + * + } + if$ + } + if$ +} +FUNCTION {format.journal.eid} +{ eid "eid" bibinfo.check + duplicate$ empty$ 'pop$ + { swap$ duplicate$ empty$ 'skip$ + { + ", " * + } + if$ + swap$ * + numpages empty$ 'skip$ + { bbl.eidpp numpages tie.or.space.prefix + "numpages" bibinfo.check * * + " (" swap$ * ")" * * + } + if$ + } + if$ +} +FUNCTION {format.vol.num.pages} +{ volume field.or.null + duplicate$ empty$ 'skip$ + { + "volume" bibinfo.check + } + if$ + bolden + number "number" bibinfo.check duplicate$ empty$ 'skip$ + { + swap$ duplicate$ empty$ + { "there's a number but no volume in " cite$ * warning$ } + 'skip$ + if$ + swap$ + "(" swap$ * ")" * + } + if$ * + eid empty$ + { format.journal.pages } + { format.journal.eid } + if$ +} + +FUNCTION {format.chapter.pages} +{ chapter empty$ + 'format.pages + { type empty$ + { bbl.chapter } + { type "l" change.case$ + "type" bibinfo.check + } + if$ + chapter tie.or.space.prefix + "chapter" bibinfo.check + * * + pages empty$ + 'skip$ + { ", " * format.pages * } + if$ + } + if$ +} + +FUNCTION {format.booktitle} +{ + booktitle "booktitle" bibinfo.check + emphasize +} +FUNCTION {format.in.ed.booktitle} +{ format.booktitle duplicate$ empty$ 'skip$ + { + editor "editor" format.names.ed duplicate$ empty$ 'pop$ + { + " " * + get.bbl.editor + "(" swap$ * "), " * + * swap$ + * } + if$ + word.in swap$ * + } + if$ +} +FUNCTION {format.thesis.type} +{ type duplicate$ empty$ + 'pop$ + { swap$ pop$ + "t" change.case$ "type" bibinfo.check + } + if$ +} +FUNCTION {format.tr.number} +{ number "number" bibinfo.check + type duplicate$ empty$ + { pop$ bbl.techrep } + 'skip$ + if$ + "type" bibinfo.check + swap$ duplicate$ empty$ + { pop$ "t" change.case$ } + { tie.or.space.prefix * * } + if$ +} +FUNCTION {format.article.crossref} +{ + word.in + " \cite{" * crossref * "}" * +} +FUNCTION {format.book.crossref} +{ volume duplicate$ empty$ + { "empty volume in " cite$ * "'s crossref of " * crossref * warning$ + pop$ word.in + } + { bbl.volume + capitalize + swap$ tie.or.space.prefix "volume" bibinfo.check * * bbl.of space.word * + } + if$ + " \cite{" * crossref * "}" * +} +FUNCTION {format.incoll.inproc.crossref} +{ + word.in + " \cite{" * crossref * "}" * +} +FUNCTION {format.org.or.pub} +{ 't := + "" + address empty$ t empty$ and + 'skip$ + { + t empty$ + { address "address" bibinfo.check * + } + { t * + address empty$ + 'skip$ + { ", " * address "address" bibinfo.check * } + if$ + } + if$ + } + if$ +} +FUNCTION {format.publisher.address} +{ publisher "publisher" bibinfo.warn format.org.or.pub +} + +FUNCTION {format.organization.address} +{ organization "organization" bibinfo.check format.org.or.pub +} + +FUNCTION {article} +{ output.bibitem + format.authors "author" output.check + author format.key output + format.date "year" output.check + date.block + format.title "title" output.check + new.block + crossref missing$ + { + journal + "journal" bibinfo.check + emphasize + "journal" output.check + format.vol.num.pages output + } + { format.article.crossref output.nonnull + format.pages output + } + if$ + format.issn output + format.doi output + new.block + format.note output + format.eprint output + format.url output + fin.entry +} +FUNCTION {book} +{ output.bibitem + author empty$ + { format.editors "author and editor" output.check + editor format.key output + } + { format.authors output.nonnull + crossref missing$ + { "author and editor" editor either.or.check } + 'skip$ + if$ + } + if$ + format.date "year" output.check + date.block + format.btitle "title" output.check + crossref missing$ + { format.bvolume output + new.block + format.number.series output + format.edition output + new.sentence + format.publisher.address output + } + { + new.block + format.book.crossref output.nonnull + } + if$ + format.isbn output + format.doi output + new.block + format.note output + format.eprint output + format.url output + fin.entry +} +FUNCTION {booklet} +{ output.bibitem + format.authors output + author format.key output + format.date "year" output.check + date.block + format.title "title" output.check + new.block + howpublished "howpublished" bibinfo.check output + address "address" bibinfo.check output + format.isbn output + format.doi output + new.block + format.note output + format.eprint output + format.url output + fin.entry +} + +FUNCTION {inbook} +{ output.bibitem + author empty$ + { format.editors "author and editor" output.check + editor format.key output + } + { format.authors output.nonnull + crossref missing$ + { "author and editor" editor either.or.check } + 'skip$ + if$ + } + if$ + format.date "year" output.check + date.block + format.btitle "title" output.check + crossref missing$ + { + format.bvolume output + format.chapter.pages "chapter and pages" output.check + new.block + format.number.series output + format.edition output + new.sentence + format.publisher.address output + } + { + format.chapter.pages "chapter and pages" output.check + new.block + format.book.crossref output.nonnull + } + if$ + crossref missing$ + { format.isbn output } + 'skip$ + if$ + format.doi output + new.block + format.note output + format.eprint output + format.url output + fin.entry +} + +FUNCTION {incollection} +{ output.bibitem + format.authors "author" output.check + author format.key output + format.date "year" output.check + date.block + format.title "title" output.check + new.block + crossref missing$ + { format.in.ed.booktitle "booktitle" output.check + format.bvolume output + format.number.series output + format.edition output + format.chapter.pages output + new.sentence + format.publisher.address output + format.isbn output + } + { format.incoll.inproc.crossref output.nonnull + format.chapter.pages output + } + if$ + format.doi output + new.block + format.note output + format.eprint output + format.url output + fin.entry +} +FUNCTION {inproceedings} +{ output.bibitem + format.authors "author" output.check + author format.key output + format.date "year" output.check + date.block + format.title "title" output.check + new.block + crossref missing$ + { format.in.ed.booktitle "booktitle" output.check + format.bvolume output + format.number.series output + format.pages output + new.sentence + publisher empty$ + { format.organization.address output } + { organization "organization" bibinfo.check output + format.publisher.address output + } + if$ + format.isbn output + format.issn output + } + { format.incoll.inproc.crossref output.nonnull + format.pages output + } + if$ + format.doi output + new.block + format.note output + format.eprint output + format.url output + fin.entry +} +FUNCTION {conference} { inproceedings } +FUNCTION {manual} +{ output.bibitem + format.authors output + author format.key output + format.date "year" output.check + date.block + format.btitle "title" output.check + organization address new.block.checkb + organization "organization" bibinfo.check output + address "address" bibinfo.check output + format.edition output + format.doi output + new.block + format.note output + format.eprint output + format.url output + fin.entry +} + +FUNCTION {mastersthesis} +{ output.bibitem + format.authors "author" output.check + author format.key output + format.date "year" output.check + date.block + format.btitle + "title" output.check + new.block + bbl.mthesis format.thesis.type output.nonnull + school "school" bibinfo.warn output + address "address" bibinfo.check output + format.doi output + new.block + format.note output + format.eprint output + format.url output + fin.entry +} + +FUNCTION {misc} +{ output.bibitem + format.authors output + author format.key output + format.date "year" output.check + date.block + format.title output + new.block + howpublished "howpublished" bibinfo.check output + format.doi output + new.block + format.note output + format.eprint output + format.url output + fin.entry +} +FUNCTION {phdthesis} +{ output.bibitem + format.authors "author" output.check + author format.key output + format.date "year" output.check + date.block + format.btitle + "title" output.check + new.block + bbl.phdthesis format.thesis.type output.nonnull + school "school" bibinfo.warn output + address "address" bibinfo.check output + format.doi output + new.block + format.note output + format.eprint output + format.url output + fin.entry +} + +FUNCTION {proceedings} +{ output.bibitem + format.editors output + editor format.key output + format.date "year" output.check + date.block + format.btitle "title" output.check + format.bvolume output + format.number.series output + new.sentence + publisher empty$ + { format.organization.address output } + { organization "organization" bibinfo.check output + format.publisher.address output + } + if$ + format.isbn output + format.issn output + format.doi output + new.block + format.note output + format.eprint output + format.url output + fin.entry +} + +FUNCTION {techreport} +{ output.bibitem + format.authors "author" output.check + author format.key output + format.date "year" output.check + date.block + format.title + "title" output.check + new.block + format.tr.number emphasize output.nonnull + institution "institution" bibinfo.warn output + address "address" bibinfo.check output + format.doi output + new.block + format.note output + format.eprint output + format.url output + fin.entry +} + +FUNCTION {unpublished} +{ output.bibitem + format.authors "author" output.check + author format.key output + format.date "year" output.check + date.block + format.title "title" output.check + format.doi output + new.block + format.note "note" output.check + format.eprint output + format.url output + fin.entry +} + +FUNCTION {default.type} { misc } +READ +FUNCTION {sortify} +{ purify$ + "l" change.case$ +} +INTEGERS { len } +FUNCTION {chop.word} +{ 's := + 'len := + s #1 len substring$ = + { s len #1 + global.max$ substring$ } + 's + if$ +} +FUNCTION {format.lab.names} +{ 's := + "" 't := + s #1 "{vv~}{ll}" format.name$ + s num.names$ duplicate$ + #2 > + { pop$ + " " * bbl.etal emphasize * + } + { #2 < + 'skip$ + { s #2 "{ff }{vv }{ll}{ jj}" format.name$ "others" = + { + " " * bbl.etal emphasize * + } + { bbl.and space.word * s #2 "{vv~}{ll}" format.name$ + * } + if$ + } + if$ + } + if$ +} + +FUNCTION {author.key.label} +{ author empty$ + { key empty$ + { cite$ #1 #3 substring$ } + 'key + if$ + } + { author format.lab.names } + if$ +} + +FUNCTION {author.editor.key.label} +{ author empty$ + { editor empty$ + { key empty$ + { cite$ #1 #3 substring$ } + 'key + if$ + } + { editor format.lab.names } + if$ + } + { author format.lab.names } + if$ +} + +FUNCTION {editor.key.label} +{ editor empty$ + { key empty$ + { cite$ #1 #3 substring$ } + 'key + if$ + } + { editor format.lab.names } + if$ +} + +FUNCTION {calc.short.authors} +{ type$ "book" = + type$ "inbook" = + or + 'author.editor.key.label + { type$ "proceedings" = + 'editor.key.label + 'author.key.label + if$ + } + if$ + 'short.list := +} + +FUNCTION {calc.label} +{ calc.short.authors + short.list + "(" + * + year duplicate$ empty$ + short.list key field.or.null = or + { pop$ "" } + 'skip$ + if$ + * + 'label := +} + +FUNCTION {sort.format.names} +{ 's := + #1 'nameptr := + "" + s num.names$ 'numnames := + numnames 'namesleft := + { namesleft #0 > } + { s nameptr + "{vv{ } }{ll{ }}{ f{ }}{ jj{ }}" + format.name$ 't := + nameptr #1 > + { + " " * + namesleft #1 = t "others" = and + { "zzzzz" * } + { t sortify * } + if$ + } + { t sortify * } + if$ + nameptr #1 + 'nameptr := + namesleft #1 - 'namesleft := + } + while$ +} + +FUNCTION {sort.format.title} +{ 't := + "A " #2 + "An " #3 + "The " #4 t chop.word + chop.word + chop.word + sortify + #1 global.max$ substring$ +} +FUNCTION {author.sort} +{ author empty$ + { key empty$ + { "to sort, need author or key in " cite$ * warning$ + "" + } + { key sortify } + if$ + } + { author sort.format.names } + if$ +} +FUNCTION {author.editor.sort} +{ author empty$ + { editor empty$ + { key empty$ + { "to sort, need author, editor, or key in " cite$ * warning$ + "" + } + { key sortify } + if$ + } + { editor sort.format.names } + if$ + } + { author sort.format.names } + if$ +} +FUNCTION {editor.sort} +{ editor empty$ + { key empty$ + { "to sort, need editor or key in " cite$ * warning$ + "" + } + { key sortify } + if$ + } + { editor sort.format.names } + if$ +} +FUNCTION {presort} +{ calc.label + label sortify + " " + * + type$ "book" = + type$ "inbook" = + or + 'author.editor.sort + { type$ "proceedings" = + 'editor.sort + 'author.sort + if$ + } + if$ + #1 entry.max$ substring$ + 'sort.label := + sort.label + * + " " + * + title field.or.null + sort.format.title + * + #1 entry.max$ substring$ + 'sort.key$ := +} + +ITERATE {presort} +SORT +STRINGS { last.label next.extra } +INTEGERS { last.extra.num number.label } +FUNCTION {initialize.extra.label.stuff} +{ #0 int.to.chr$ 'last.label := + "" 'next.extra := + #0 'last.extra.num := + #0 'number.label := +} +FUNCTION {forward.pass} +{ last.label label = + { last.extra.num #1 + 'last.extra.num := + last.extra.num int.to.chr$ 'extra.label := + } + { "a" chr.to.int$ 'last.extra.num := + "" 'extra.label := + label 'last.label := + } + if$ + number.label #1 + 'number.label := +} +FUNCTION {reverse.pass} +{ next.extra "b" = + { "a" 'extra.label := } + 'skip$ + if$ + extra.label 'next.extra := + extra.label + duplicate$ empty$ + 'skip$ + { "{\natexlab{" swap$ * "}}" * } + if$ + 'extra.label := + label extra.label * 'label := +} +EXECUTE {initialize.extra.label.stuff} +ITERATE {forward.pass} +REVERSE {reverse.pass} +FUNCTION {bib.sort.order} +{ sort.label + " " + * + year field.or.null sortify + * + " " + * + title field.or.null + sort.format.title + * + #1 entry.max$ substring$ + 'sort.key$ := +} +ITERATE {bib.sort.order} +SORT +FUNCTION {begin.bib} +{ preamble$ empty$ + 'skip$ + { preamble$ write$ newline$ } + if$ + "\begin{thebibliography}{" number.label int.to.str$ * "}" * + write$ newline$ + "\newcommand{\enquote}[1]{``#1''}" + write$ newline$ + "\providecommand{\natexlab}[1]{#1}" + write$ newline$ + "\providecommand{\url}[1]{\texttt{#1}}" + write$ newline$ + "\providecommand{\urlprefix}{URL }" + write$ newline$ + "\expandafter\ifx\csname urlstyle\endcsname\relax" + write$ newline$ + " \providecommand{\doi}[1]{doi:\discretionary{}{}{}#1}\else" + write$ newline$ + " \providecommand{\doi}{doi:\discretionary{}{}{}\begingroup \urlstyle{rm}\Url}\fi" + write$ newline$ + "\providecommand{\eprint}[2][]{\url{#2}}" + write$ newline$ +} +EXECUTE {begin.bib} +EXECUTE {init.state.consts} +ITERATE {call.type$} +FUNCTION {end.bib} +{ newline$ + "\end{thebibliography}" write$ newline$ +} +EXECUTE {end.bib} +%% End of customized bst file +%% +%% End of file `jss.bst'. diff --git a/inst/rmarkdown/templates/ajs/skeleton/ajs.cls b/inst/rmarkdown/templates/ajs/skeleton/ajs.cls new file mode 100644 index 000000000..358741617 --- /dev/null +++ b/inst/rmarkdown/templates/ajs/skeleton/ajs.cls @@ -0,0 +1,523 @@ +%% +%% This is file `ajs.cls', +\def\fileversion{1.0} +%% based on jss.cls, file version 2.2. +\def\filename{ajs} +\def\filedate{2014/01/01} +%% +%% Package `ajs' to use with LaTeX2e for AJS publications +%% (package ajs is based on jss from http://www.jstatsoft.org/ by +%% Achim Zeileis +%% Minor modifications (jss.cls --> ajs.cls) by Matthias Templ +%% ajs.cls is under GPL-2 +%% +\NeedsTeXFormat{LaTeX2e} +\ProvidesClass{ajs}[\filedate\space\fileversion\space copied version of jss class by Achim Zeileis] +%% options +\newif\if@article +\newif\if@codesnippet +\newif\if@bookreview +\newif\if@softwarereview +\newif\if@review +\newif\if@shortnames +\newif\if@nojss +\newif\if@notitle +\newif\if@noheadings +\newif\if@nofooter + +\@articletrue +\@codesnippetfalse +\@bookreviewfalse +\@softwarereviewfalse +\@reviewfalse +\@shortnamesfalse +\@nojssfalse +\@notitlefalse +\@noheadingsfalse +\@nofooterfalse + +\DeclareOption{article}{\@articletrue% + \@codesnippetfalse \@bookreviewfalse \@softwarereviewfalse} +\DeclareOption{codesnippet}{\@articlefalse% + \@codesnippettrue \@bookreviewfalse \@softwarereviewfalse} +\DeclareOption{bookreview}{\@articlefalse% + \@codesnippetfalse \@bookreviewtrue \@softwarereviewfalse} +\DeclareOption{softwarereview}{\@articlefalse% + \@codesnippetfalse \@bookreviewfalse \@softwarereviewtrue} +\DeclareOption{shortnames}{\@shortnamestrue} +\DeclareOption{nojss}{\@nojsstrue} +\DeclareOption{notitle}{\@notitletrue} +\DeclareOption{noheadings}{\@noheadingstrue} +\DeclareOption{nofooter}{\@nofootertrue} + +\ProcessOptions +\LoadClass[11pt,a4paper,twoside]{article} +%% required packages +% This fixes https://github.com/matthias-da/ajs-public/issues/2. +% Retrieved from https://github.com/rstudio/rticles/issues/329 +\RequirePackage[2020/02/02]{latexrelease} +\RequirePackage{graphicx,color,xcolor,ae,fancyvrb} +\usepackage{orcidlink} +\RequirePackage[T1]{fontenc} +\IfFileExists{upquote.sty}{\RequirePackage{upquote}}{} +\IfFileExists{lmodern.sty}{\RequirePackage{lmodern}}{} +%% bibliography +\if@shortnames + \usepackage[authoryear,round]{natbib} +\else + \usepackage[authoryear,round,longnamesfirst]{natbib} +\fi +\bibpunct{(}{)}{;}{a}{}{,} +\bibliographystyle{ajs} +%% page layout +%\topmargin 0pt +\topmargin -50pt +%\textheight 46\baselineskip +\textheight 53\baselineskip +\advance\textheight by \topskip +\oddsidemargin 0.1in +\evensidemargin 0.15in +\marginparwidth 1in +\oddsidemargin 0.125in +\evensidemargin 0.125in +\marginparwidth 0.75in +\textwidth 6.125in +%% paragraphs +\setlength{\parskip}{0.7ex plus0.1ex minus0.1ex} +\setlength{\parindent}{0em} +%% for all publications +\newcommand{\Address}[1]{\def\@Address{#1}} +\newcommand{\Plaintitle}[1]{\def\@Plaintitle{#1}} +\newcommand{\Shorttitle}[1]{\def\@Shorttitle{#1}} +\newcommand{\Plainauthor}[1]{\def\@Plainauthor{#1}} +\newcommand{\Volume}[1]{\def\@Volume{#1}} +\newcommand{\Year}[1]{\def\@Year{#1}} +\newcommand{\Month}[1]{\def\@Month{#1}} +\newcommand{\Issue}[1]{\def\@Issue{#1}} +\newcommand{\Submitdate}[1]{\def\@Submitdate{#1}} +%% for articles and code snippets +\newcommand{\Acceptdate}[1]{\def\@Acceptdate{#1}} +\newcommand{\Abstract}[1]{\def\@Abstract{#1}} +\newcommand{\Keywords}[1]{\def\@Keywords{#1}} +\newcommand{\Plainkeywords}[1]{\def\@Plainkeywords{#1}} +%% for book and software reviews +\newcommand{\Reviewer}[1]{\def\@Reviewer{#1}} +\newcommand{\Booktitle}[1]{\def\@Booktitle{#1}} +\newcommand{\Bookauthor}[1]{\def\@Bookauthor{#1}} +\newcommand{\Publisher}[1]{\def\@Publisher{#1}} +\newcommand{\Pubaddress}[1]{\def\@Pubaddress{#1}} +\newcommand{\Pubyear}[1]{\def\@Pubyear{#1}} +\newcommand{\ISBN}[1]{\def\@ISBN{#1}} +\newcommand{\Pages}[1]{\def\@Pages{#1}} +\newcommand{\Price}[1]{\def\@Price{#1}} +\newcommand{\Plainreviewer}[1]{\def\@Plainreviewer{#1}} +\newcommand{\Softwaretitle}[1]{\def\@Softwaretitle{#1}} +\newcommand{\URL}[1]{\def\@URL{#1}} +\newcommand{\DOI}[1]{\def\@DOI{#1}} +%% for internal use +\newcommand{\Seriesname}[1]{\def\@Seriesname{#1}} +%\newcommand{\Pages}[1]{\def\@Pages{#1}} +\newcommand{\Hypersubject}[1]{\def\@Hypersubject{#1}} +\newcommand{\Hyperauthor}[1]{\def\@Hyperauthor{#1}} +\newcommand{\Footername}[1]{\def\@Footername{#1}} +\newcommand{\Firstdate}[1]{\def\@Firstdate{#1}} +\newcommand{\Seconddate}[1]{\def\@Seconddate{#1}} +\newcommand{\Reviewauthor}[1]{\def\@Reviewauthor{#1}} + +\usepackage{booktabs} +%% defaults +\author{Firstname Lastname\\Affiliation} +\title{Title} +\Abstract{---!!!---an abstract is required---!!!---} +\Plainauthor{\@author} +\Volume{VV} +\Year{YYYY} +\Month{MMMMMM} +\Issue{II} +\Submitdate{yyyy-mm-dd} +\Acceptdate{yyyy-mm-dd} +\Address{ + Firstname Lastname\\ + Affiliation\\ + Address, Country\\ + E-mail: \email{name@address}\\ + URL: \url{http://link/to/webpage/} +} + +\Reviewer{Firstname Lastname\\Affiliation} +\Plainreviewer{Firstname Lastname} +\Booktitle{Book Title} +\Bookauthor{Book Author} +\Publisher{Publisher} +\Pubaddress{Publisher's Address} +\Pubyear{YYY} +\ISBN{x-xxxxx-xxx-x} +\Pages{xv + 123} +\Price{USD 69.95 (P)} +\URL{http://link/to/webpage/} + \DOI{10.17713/ajs.v000.i00} +\if@article + \Seriesname{Issue} + \Hypersubject{Austrian Journal of Statistics} + \Plaintitle{\@title} + \Shorttitle{\@title} + \Plainkeywords{\@Keywords} +\fi + +\if@codesnippet + \Seriesname{Code Snippet} + \Hypersubject{Austrian Journal of Statistics -- Code Snippets} + \Plaintitle{\@title} + \Shorttitle{\@title} + \Plainkeywords{\@Keywords} +\fi + +\if@bookreview + \Seriesname{Book Review} + \Hypersubject{Austrian Journal of Statistics -- Book Reviews} + \Plaintitle{\@Booktitle} + \Shorttitle{\@Booktitle} + \Reviewauthor{\@Bookauthor\\ + \@Publisher, \@Pubaddress, \@Pubyear.\\ + ISBN~\@ISBN. \@Pages~pp. \@Price.\\ + \url{\@URL}} + \Plainkeywords{} + \@reviewtrue +\fi + +\if@softwarereview + \Seriesname{Software Review} + \Hypersubject{Austrian Journal of Statistics -- Software Reviews} + \Plaintitle{\@Softwaretitle} + \Shorttitle{\@Softwaretitle} + \Booktitle{\@Softwaretitle} + \Reviewauthor{\@Publisher, \@Pubaddress. \@Price.\\ + \url{\@URL}} + \Plainkeywords{} + \@reviewtrue +\fi + +\if@review + \Hyperauthor{\@Plainreviewer} + \Keywords{} + \Footername{Reviewer} + \Firstdate{\textit{Published:} \@Submitdate} + \Seconddate{} +\else + \Hyperauthor{\@Plainauthor} + \Keywords{---!!!---at least one keyword is required---!!!---} + \Footername{Affiliation} + \Firstdate{\textit{Submitted:} \@Submitdate} + \Seconddate{\textit{Accepted:} \@Acceptdate} +\fi +%% Sweave(-like) +\DefineVerbatimEnvironment{Sinput}{Verbatim}{fontshape=sl} +\DefineVerbatimEnvironment{Soutput}{Verbatim}{} +\DefineVerbatimEnvironment{Scode}{Verbatim}{fontshape=sl} +\newenvironment{Schunk}{}{} +\DefineVerbatimEnvironment{Code}{Verbatim}{} +\DefineVerbatimEnvironment{CodeInput}{Verbatim}{fontshape=sl} +\DefineVerbatimEnvironment{CodeOutput}{Verbatim}{} +\newenvironment{CodeChunk}{}{} +\setkeys{Gin}{width=0.8\textwidth} +%% footer +\newlength{\footerskip} +\setlength{\footerskip}{2.5\baselineskip plus 2ex minus 0.5ex} + +\newcommand{\makefooter}{% + \vspace{\footerskip} + + \if@nojss + \begin{samepage} + \textbf{\large \@Footername: \nopagebreak}\\[.3\baselineskip] \nopagebreak + \@Address \nopagebreak + \end{samepage} + \else + \begin{samepage} + \textbf{\large \@Footername: \nopagebreak}\\[.3\baselineskip] \nopagebreak + \@Address \nopagebreak + \vfill + \hrule \nopagebreak + \vspace{.1\baselineskip} + {\fontfamily{phv} \fontsize{11}{13} \selectfont Austrian Journal of Statistics} + \hfill + \url{http://www.ajs.or.at/}\\ \nopagebreak + published by the Austrian Society of Statistics + \hfill + \url{http://www.osg.or.at/}\\[.3\baselineskip] \nopagebreak + {Volume~\@Volume , Issue~\@Issue%, \@Seriesname~\@Issue + } + \hfill + \@Firstdate\\ \nopagebreak + {\href{https://doi.org/\@DOI}{\tt doi:\@DOI}} + %{\@Month{} \@Year} + \hfill + \@Seconddate \nopagebreak + \vspace{.3\baselineskip} + \hrule + \end{samepage} + \fi +} +\if@nofooter + %% \AtEndDocument{\makefooter} +\else + \AtEndDocument{\makefooter} +\fi +%% required packages +\RequirePackage{hyperref} +%% new \maketitle +\def\@myoddhead{ + {\color{white} AJS}\\[-1.42cm] + \hspace{-2em} %\includegraphics[height=13mm,keepaspectratio]{jsslogo} \hfill + \parbox[b][23mm]{118mm}{%\hrule height 3pt +% \center{ + {\fontfamily{phv} \fontsize{11}{13} \selectfont \href{http://www.ajs.or.at}{Austrian Journal of Statistics}}\\ + % \vfill + {\it \small \@Month{} \@Year, Volume~\@Volume, Issue~\@Issue, \@Pages. \\%, \@Seriesname~\@Issue. \\% + %\hfill + \href{http://www.ajs.or.at/}{http://www.ajs.or.at/}} + %} + \\[0.1cm] %\vspace{-3cm} + % \hrule height 3pt + } + \parbox[b][3mm]{118mm}{ + %\vspace*{-2cm} + \href{www.osg.or.at}{\includegraphics[width=0.2\textwidth]{oesg}} \\ \vfill + } + } +% \def\@myoddhead{ +% {\color{white} JSS}\\[-1.42cm] {\color{white} AJS}\\[-1.42cm] +% \hspace{-2em} \includegraphics[height=23mm,keepaspectratio]{jsslogo} \hfill \hspace{-2em} %\includegraphics[height=13mm,keepaspectratio]{jsslogo} \hfill +% \parbox[b][23mm]{118mm}{\hrule height 3pt \parbox[b][23mm]{118mm}{%\hrule height 3pt +% \center{ % \center{ +% {\fontfamily{pzc} \fontsize{28}{32} \selectfont Journal of Statistical Software} {\fontfamily{phv} \fontsize{11}{13} \selectfont \href{http://www.ajs.or.at}{Austrian Journal of Statistics}}\\ +% \vfill % \vfill +% {\it \small \@Month{} \@Year, Volume~\@Volume, \@Seriesname~\@Issue.% {\it \small \@Month{} \@Year, Volume~\@Volume, \@Pages. \\%, \@Seriesname~\@Issue. \\% +% \hfill \href{https://doi.org/\@DOI}{doi:\,\@DOI}}}\\[0.1cm] %\hfill +% \hrule height 3pt}} +\if@review + \renewcommand{\maketitle}{ + \if@nojss + %% \@oddhead{\@myoddhead}\\[3\baselineskip] + \else + \@oddhead{\@myoddhead}\\[3\baselineskip] + \fi + {\large + \noindent + Reviewer: \@Reviewer + \vspace{\baselineskip} + \hrule + \vspace{\baselineskip} + \textbf{\@Booktitle} + \begin{quotation} \noindent + \@Reviewauthor + \end{quotation} + \vspace{0.7\baselineskip} + \hrule + \vspace{1.3\baselineskip} + } + + \thispagestyle{empty} + \if@nojss + \markboth{\centerline{\@Shorttitle}}{\centerline{\@Hyperauthor}} + \else + \markboth{\centerline{\@Shorttitle}}{\centerline{\@Hypersubject}} + \fi + \pagestyle{myheadings} + } +\else + \def\maketitle{ + \if@nojss + %% \@oddhead{\@myoddhead} \par + \else + \@oddhead{\@myoddhead} \par + \fi + \begingroup + \def\thefootnote{\fnsymbol{footnote}} + \def\@makefnmark{\hbox to 0pt{$^{\@thefnmark}$\hss}} + \long\def\@makefntext##1{\parindent 1em\noindent + \hbox to1.8em{\hss $\m@th ^{\@thefnmark}$}##1} + \@maketitle \@thanks + \endgroup + \setcounter{footnote}{0} + + \if@noheadings + %% \markboth{\centerline{\@Shorttitle}}{\centerline{\@Hypersubject}} + \else + \thispagestyle{empty} + \if@nojss + \markboth{\centerline{\@Shorttitle}}{\centerline{\@Hyperauthor}} + \else + \markboth{\centerline{\@Shorttitle}}{\centerline{\@Hypersubject}} + \fi + \pagestyle{myheadings} + \fi + + \let\maketitle\relax \let\@maketitle\relax + \gdef\@thanks{}\gdef\@author{}\gdef\@title{}\let\thanks\relax + } + + \def\@maketitle{\vbox{\hsize\textwidth \linewidth\hsize + \if@nojss + %% \vskip 1in + \else + \vskip 1in + \fi + {\centering + {\LARGE\bf \@title\par} + \vskip 0.2in plus 1fil minus 0.1in + { + \def\and{\unskip\enspace{\rm and}\enspace}% + \def\And{\end{tabular}\hss \egroup \hskip 1in plus 2fil + \hbox to 0pt\bgroup\hss \begin{tabular}[t]{c}\large\bf\rule{\z@}{24pt}\ignorespaces}% + \def\AND{\end{tabular}\hss\egroup \hfil\hfil\egroup + \vskip 0.1in plus 1fil minus 0.05in + \hbox to \linewidth\bgroup\rule{\z@}{10pt} \hfil\hfil + \hbox to 0pt\bgroup\hss \begin{tabular}[t]{c}\large\bf\rule{\z@}{24pt}\ignorespaces} + \hbox to \linewidth\bgroup\rule{\z@}{10pt} \hfil\hfil + \hbox to 0pt\bgroup\hss \begin{tabular}[t]{c}\large\bf\rule{\z@}{24pt}\@author + \end{tabular}\hss\egroup + \hfil\hfil\egroup} + \vskip 0.3in minus 0.1in + \hrule + \begin{abstract} + \@Abstract + \end{abstract}} + \textit{Keywords}:~\@Keywords. + \vskip 0.1in minus 0.05in + \hrule + \vskip 0.2in minus 0.1in + }} +\fi +%% sections, subsections, and subsubsections +\newlength{\preXLskip} +\newlength{\preLskip} +\newlength{\preMskip} +\newlength{\preSskip} +\newlength{\postMskip} +\newlength{\postSskip} +\setlength{\preXLskip}{1.8\baselineskip plus 0.5ex minus 0ex} +\setlength{\preLskip}{1.5\baselineskip plus 0.3ex minus 0ex} +\setlength{\preMskip}{1\baselineskip plus 0.2ex minus 0ex} +\setlength{\preSskip}{.8\baselineskip plus 0.2ex minus 0ex} +\setlength{\postMskip}{.5\baselineskip plus 0ex minus 0.1ex} +\setlength{\postSskip}{.3\baselineskip plus 0ex minus 0.1ex} + +\newcommand{\jsssec}[2][default]{\vskip \preXLskip% + \pdfbookmark[1]{#1}{Section.\thesection.#1}% + \refstepcounter{section}% + \centerline{\textbf{\Large \thesection. #2}} \nopagebreak + \vskip \postMskip \nopagebreak} +\newcommand{\jsssecnn}[1]{\vskip \preXLskip% + \centerline{\textbf{\Large #1}} \nopagebreak + \vskip \postMskip \nopagebreak} + +\newcommand{\jsssubsec}[2][default]{\vskip \preMskip% + \pdfbookmark[2]{#1}{Subsection.\thesubsection.#1}% + \refstepcounter{subsection}% + \textbf{\large \thesubsection. #2} \nopagebreak + \vskip \postSskip \nopagebreak} +\newcommand{\jsssubsecnn}[1]{\vskip \preMskip% + \textbf{\large #1} \nopagebreak + \vskip \postSskip \nopagebreak} + +\newcommand{\jsssubsubsec}[2][default]{\vskip \preSskip% + \pdfbookmark[3]{#1}{Subsubsection.\thesubsubsection.#1}% + \refstepcounter{subsubsection}% + {\large \textit{#2}} \nopagebreak + \vskip \postSskip \nopagebreak} +\newcommand{\jsssubsubsecnn}[1]{\vskip \preSskip% + {\textit{\large #1}} \nopagebreak + \vskip \postSskip \nopagebreak} + +\newcommand{\jsssimplesec}[2][default]{\vskip \preLskip% +%% \pdfbookmark[1]{#1}{Section.\thesection.#1}% + \refstepcounter{section}% + \textbf{\large #1} \nopagebreak + \vskip \postSskip \nopagebreak} +\newcommand{\jsssimplesecnn}[1]{\vskip \preLskip% + \textbf{\large #1} \nopagebreak + \vskip \postSskip \nopagebreak} + +\if@review + \renewcommand{\section}{\secdef \jsssimplesec \jsssimplesecnn} + \renewcommand{\subsection}{\secdef \jsssimplesec \jsssimplesecnn} + \renewcommand{\subsubsection}{\secdef \jsssimplesec \jsssimplesecnn} +\else + \renewcommand{\section}{\secdef \jsssec \jsssecnn} + \renewcommand{\subsection}{\secdef \jsssubsec \jsssubsecnn} + \renewcommand{\subsubsection}{\secdef \jsssubsubsec \jsssubsubsecnn} +\fi +%% colors +\definecolor{Red}{rgb}{0.5,0,0} +\definecolor{Blue}{rgb}{0,0,0.5} +\if@review + \hypersetup{% + hyperindex = {true}, + colorlinks = {true}, + linktocpage = {true}, + plainpages = {false}, + linkcolor = {Blue}, + citecolor = {Blue}, + urlcolor = {Red}, + pdfstartview = {Fit}, + pdfpagemode = {None}, + pdfview = {XYZ null null null} + } +\else + \hypersetup{% + hyperindex = {true}, + colorlinks = {true}, + linktocpage = {true}, + plainpages = {false}, + linkcolor = {Blue}, + citecolor = {Blue}, + urlcolor = {Red}, + pdfstartview = {Fit}, + pdfpagemode = {UseOutlines}, + pdfview = {XYZ null null null} + } +\fi +\if@nojss + \AtBeginDocument{ + \hypersetup{% + pdfauthor = {\@Hyperauthor}, + pdftitle = {\@Plaintitle}, + pdfkeywords = {\@Plainkeywords} + } + } +\else + \AtBeginDocument{ + \hypersetup{% + pdfauthor = {\@Hyperauthor}, + pdftitle = {\@Plaintitle}, + pdfsubject = {\@Hypersubject}, + pdfkeywords = {\@Plainkeywords} + } + } +\fi +\if@notitle + %% \AtBeginDocument{\maketitle} +\else + \AtBeginDocument{\maketitle} + %\@ifundefined{AddToHook}{\AtBeginDocument{\maketitle}}{\AddToHook{begindocument}[maketitle]{\maketitle}} +\fi +%% commands +\newcommand\code{\bgroup\@makeother\_\@makeother\~\@makeother\$\@codex} +\def\@codex#1{{\normalfont\ttfamily\hyphenchar\font=-1 #1}\egroup} +%%\let\code=\texttt +\let\proglang=\textsf +\newcommand{\pkg}[1]{{\fontseries{b}\selectfont #1}} +\newcommand{\email}[1]{\href{mailto:#1}{\normalfont\texttt{#1}}} +\ifx\csname urlstyle\endcsname\relax + \newcommand\@doi[1]{doi:\discretionary{}{}{}#1}\else + \newcommand\@doi{doi:\discretionary{}{}{}\begingroup +\urlstyle{tt}\Url}\fi +\newcommand{\doi}[1]{\href{http://dx.doi.org/#1}{\normalfont\texttt{\@doi{#1}}}} +\newcommand{\E}{\mathsf{E}} +\newcommand{\VAR}{\mathsf{VAR}} +\newcommand{\COV}{\mathsf{COV}} +\newcommand{\Prob}{\mathsf{P}} +\endinput +%% +%% End of file `jss.cls'. diff --git a/inst/rmarkdown/templates/ajs/skeleton/oesg.png b/inst/rmarkdown/templates/ajs/skeleton/oesg.png new file mode 100644 index 0000000000000000000000000000000000000000..2b0079538ab8d8be04afca4b50648030c8abffae GIT binary patch literal 2885 zcmV-L3%c})P)++E0001BP)t-sdw#N6 zU7(<%#_#X&^78VvXOW~tdcuOF>F4X}-{ne9moYVojuTihHi|JdijI-JK}C}nkg^WJ0jC|f5R|M z)BN~#Ki(Say3U8hLGKEk|2jb`G=>v@^-)QXq`+~AQ8ya=3EyR!th=SlI)7o{U&QReZU)I}_5JI$AH?gwZ^ zNO`OSwp23Q*qSh9`!~kUWlxdp*6$cfgw?XH%Tk$^<`8#qve(%nVX*DqC~uiKn)=KS zJbQBaI`ji4UR5S-!&)~(+4I^oTa{*Uk<=4O{pqs}TZ(h(EB&s=HMCxw+Y?zKT!scl zq8%4Ak*RU`IQ4^B`9Xf;PzU6Tux49b@|LzKzp#{L7t1!S+}SR5vmckLWh;`<lf{uh>=xbj`*> ziA51l@_|E7hWQTj0a!;_w_QnGTk(U1q&66lX_kZ?n&YurNdlSpkkLZei|4!Zj24N5 zqN+m?Q5HIepqG2;FKCnb2?r_ZEIRQ6%xLb+imc~At_55C zz$*@#Ks$TNKw8X3j#tYw!gb>O-#y6(qJzBji64M;TWuN3lqavW3mP<`ZpXk{g%Fla z5ngN&Y*M*VcgJn1s%lkh)Jvq~b8baWqY8f3=eUU0TOva| zN&KBWb(JEN6i091&T`P8@MNUk5L}Ifo>Sm(19_e zck@Q!XdZ~r?}()4!99_#Rw*>}8(d%lw8$c|5&26T>^7M>=+RV9V-aqwuAK4#fj5)_ zYC{_{B>o+SaQrf5;}ULk*(3Do)sH;CB{wdx>T|#rR-htoO~R(C#WJ z(UJ`x5SqeYv7#C44pZN8kX`wL<9dZ_GHDpu4?G7Bz;lFFq%L+hB9IjQd=Pvv9pnng zMhAr9mi@ozU_zlCS<#R8FZlYx>*vtJFm17tirh|2TlX9o%v~<8Y(HxqBawCD1BV<` zVns-LWJTlGeZKx2ewU3+kPjkrpiC(1=0-+LW;VXC`@*W?fF?cWz*D%+u_)u;S2>u9 zglE8}o;VPp@2hqHpLKBKYB>AB0SA%lWILnjK5$TC&^L7)i$MJGA!6UhqVERAqB^LS#UTeK%j=_95jGEB zwj!wPbA6DIFXsbFvR!b=Vs~ZM6sUnCUE`R4w9b7(caPvkXVeIJxchp?z%_cf{4H5RxixqVg z_v+XDpj5NjlZ(w0F6#H0ACtnwxClTp@E8RuP)X5}8*~Ie7Qu+rfGjmRJuViDxabf4 zpiDIzh{7Fde?eHotB^6#yVUgmt|J9(^b}R==zhbIU+>jI;l0XSGmFoXV7LyAb|QsHiF#zpLnvH zsnX}tYfKelbSg2Y>W6EzIT=e!Ct58xsHw5aoUXq+DO=Z>o7M#LxBv}Mk0UOMSaQDT z2W8Hr1B{%!dSe7k6jao5#a;?fF48u;Z`XUn>CUPgQ`&Pl-3Ls}Pd4a!Il@Jyv-}4- zh#vhQ=K4^z8d_BvM8i>h$tW#GW@rqv9N^sgieymdW|MP0XTQ~Qa!J~1Ij0~nB`d3&gYamC)q-LZ$tShQ7d0bY-;4U(>gzAL_A8AQ}e0iLC8pa?4{l%Zdg z@&Pb;SRXu`)P4?V%+Pf#QdFI+W?ZXaLbYlb6zIfF_3Y{k5{~L!i!zBpy}d0tmF);u z?!iMo_#j+#P#@e^Br;3(1F~kTX2*BbUzMbYup?^j-ZEGh>7LgS;YPS{~BiDKCl&V;hGUL=CJ2w=?X9OV2oqaRSmN?L_`1@t%U&EcBe zbbK;Ub?UUR$k!gC+1yEWoc94611@^CK0pp2ALz|RyNr)=oz#hUAy0xfkNR3DYU*Z3 zeAL&a>Q$f2Yg}|zCqL7H97}_NbhgqhR-sD{z}PFVGgkQkQ%uH+)Mm&;KPt&$AU>cH4$g_!_^_L5yOyyTv;` z7v|OAxPVT?xs+f>lI|%t%cSe;I~9-R6-WJ|xA({KS=)II-}`|qs~Xm7BMfSytgeub z^v8BLsZ~eT$#y6+rl8DqJq z%0o--^#6+ze#@KuUI)9ibjvsHjhc2LXCu;%;TAlx;vJ=2tn=9DDT3-3kI&J5{aWki zI`E#lErL+A+#-u@Z|Y+6{FK?wu~A|X{6y75-t|G)7R`wcvK5t+!1v>a`N;RXHv0cF za^n8^_BgH$G-k%5ho9vP;9s1WzGYz9>U01A03~!qSaf7zbY(hYa%Ew3WdJfTF*GeO zF)c7RR53U@FfuwYI4dwQIxsLqX@AB5001R)MObuXVRU6WZEs|0W_bWIFflYOFflDK jH&ih=IxsOhH90FVF*-0XFqC + This guide of the Austrian Journal of Statistics (AJS) shows the required style of manuscripts submitted to the Austrian Journal of Statistics. We strongly recommend to follow the given instructions exactly already when writing the paper. When submitting papers to AJS, it is essential to follow these guidelines. Manuscripts submitted without consideration of the AJS style guide will most likely not be forwarded for review, but rejected with the possibility of resubmission. +keywords: + # at least one keyword must be supplied + formatted: [keywords, not capitalized, "\\proglang{Java}"] + plain: [keywords, not capitalized, Java] +preamble: > + \usepackage{amsmath} +output: rticles::ajs_article +--- + +```{r, setup, include=FALSE} +options(prompt = 'R> ', continue = '+ ') +``` + + +Before we look at style in more detail, the most common mistakes and errors are described: + +# Frequently made style mistakes + + +- AJS style is not used +- Title in Capitalized style. See the title of the guidelines for illustration. +- Subsection in lower case style. See the subsection of the guidelines for illustration +- Capitalized Titles for references. E.g. \cite{fleet20} should appear in the reference list as "Fleet Management in Free-Floating Bike Sharing Systems Using + Predictive Modelling and Exploratory Tools" and NOT as "Fleet management in free-floating bike sharing systems using + predictive modelling and exploratory tools". +- Include DOI numbers for each citation (if possible) +- Use vector-based graphics such as \texttt{pdf}. Do not use pixel-based graphics like \texttt{png}, \texttt{jpeg}, and do not convert from \texttt{png} or \texttt{jpeg} to \texttt{pdf} + + +# Introduction + +The style file of the Austrian Journal of Statistics is based on the style file of the Journal of Statistical Software (JSS) including minor modifications. We thank Achim Zeileis for his great work on the JSS style file. + +The Austrian Journal of Statistics is freely available over the net. Free and open-source tools used for production of your manuscript are therefore also highly supported. Code to reproduce the figures and tables in manuscripts as well as methods implemented in software can be published as supplementary material. This increases usually the number of downloads of your article. + + +\section{Writing your manuscript} + +The Journal is produced on the basis of computer readable manuscripts provided by the authors. + +Footnotes should be avoided. + +The article should be structured by enumerated sections and +subsections. The title should be in title case style, sections and subsections in section case style. Graphics and tables must contain captions, above +tables and below graphics (figures). Examples are (see Figure~\ref{Fig3.4} and Table~\ref{Tab3.4}). +Graphics \textbf{should be produced in \textbf{pdf} format} and included + at suitable places of the manuscript. + +\begin{figure}[hbt] +\begin{center} +\includegraphics{ajs-download20180210.pdf} +\caption{\label{Fig3.4}Download statistics of articles per month at the Austrian Journal of Statistics.} +\end{center} +\end{figure} + +\begin{table}[hbt] +\caption{\label{Tab3.4}80 measured values of access time.} +\vspace*{-5mm} +\small +\hspace{1.5cm} +\begin{center} +\begin{tabular}{|llllllll|} +\toprule +70.0 & 68.6 & 67.9 & 66.3 & 71.0 & 64.2 & 69.6 & 71.0\\ +... & ... & ... & ... & ... & ... & ... & ...\\ +%69.7 & 69.0 & 73.4 & 69.0 & 70.1 & 69.8 & 69.0 & 73.0\\ +%70.0 & 69.1 & 69.5-& 67.9 & 72.8 & 72.1 & 69.5+& 70.1\\ +%70.2 & 69.1 & 68.9 & 68.3 & 74.9 & 68.4 & 69.1 & 66.6\\ +%71.1 & 69.2 & 71.2 & 68.9 & 70.9 & 70.6 & 69.9 & 69.9\\ +%69.4 & 69.5+& 68.5+& 70.9 & 71.6 & 68.9 & 72.0 & 70.3\\ +%68.6 & 68.5-& 67.8 & 72.2 & 68.7 & 70.6 & 66.9 & 69.3\\ +%71.4 & 68.7 & 74.2 & 68.8 & 71.4 & 71.8 & 67.5-& 70.4\\ +%71.4 & 67.4 & 69.5-& 72.4 & 70.4 & 69.3 & 68.2 & 67.0\\ +71.7 & 70.5+& 72.5-& 68.2 & 67.6 & 68.6 & 70.5-& 65.8\\ +\bottomrule +\end{tabular} +\end{center} +\end{table} + +Mathematical formulas should be enumerated as far as they are +referenced \textbf{only}. E.g.~Equation~(\ref{form3.1}) shows the density +\begin{equation}\label{form3.1} +f(x) = +\frac1{\sqrt{2\pi}\sigma}e^{-\frac{(x-\mu)^2}{2\sigma^2}}\,. +\end{equation} + +Please consider + +- capitalized title case for titles and for all references and +- sentence, non-capitalized case for sections and subsections. + + + +Cited literature should be summarized at the end of the article in +form of a non-enumerated section. \cite{leisch02} is a reference +to an article. If the citation is in parentheses, it +should look like \citep{leisch02}. +References should be in title case. + +Correspondence addresses of author(s) should be added at the end +of the manuscript. + + +# Submission and refereeing + + +## Submission + +Consideration of the previously stated rules are of great help for +the editing process. Whenever technically possible, manuscripts +should be submitted through the editorial system at \href{www.ajs.or.at}{www.ajs.or.at}. The authors must be registered at this website. + +## Refereing + +All contributions will be anonymously refereed. Cited literature which is +hardly available should accompany the submitted manuscript. It +should also be considered to place used and analyzed data at +disposal for the referees (if there are no legal or technical +arguments against). + +Editor and referees must trust that the contribution has not been +submitted for publication at the same time at another place. It is +fair that the submitting author notifies if an earlier version has +already been submitted somewhere before. + +## Copyrights and fees + +The Austrian Journal of Statistics is free of +charge. Generally, we use the Creative Commons Attribution License (CC-BY). + +For copyright issues, publication ethics and malpractice statements, please have a look at +\href{www.ajs.or.at}{www.ajs.or.at} + + + + + +# Specifics to markdown + +## Code formatting + +In general, don't use Markdown, but use the more precise LaTeX commands instead: + +* \proglang{Java} +* \pkg{plyr} + +One exception is inline code, which can be written inside a pair of backticks (i.e., using the Markdown syntax). + +If you want to use LaTeX commands in headers, you need to provide a `short-title` attribute. You can also provide a custom identifier if necessary. See the header of Section \ref{r-code} for example. + +# \proglang{R} code {short-title="R code" #r-code} + +Can be inserted in regular R markdown blocks. + +```{r} +x <- 1:10 +x +``` + +## Features specific to \pkg{rticles} {short-title="Features specific to rticles"} + +* Adding short titles to section headers is a feature specific to \pkg{rticles} (implemented via a Pandoc Lua filter). This feature is currently not supported by Pandoc and we will update this template if [it is officially supported in the future](https://github.com/jgm/pandoc/issues/4409). +* Using the `\AND` syntax in the `author` field to add authors on a new line. This is a specific to the `rticles::ajs_article` format. + + +# Checklist + +We list the most common mistakes when submitting manuscripts to the journal and formulate them in form of questions. + +- Did you upload a pdf of your manuscript for review? (no Word, no .tex, ...) +- Did you use the style of AJS? +- Are your graphics produced in pdf format? +- Is your title captialized? +- Are the titles of your cited papers in your references capitalized? +- Are your section and subsection headers non-capitalized form? +- Are your tables produced with \LaTeX ? (no screenshots) +- Have you cited the software you used, e.g. R itself and R packages used? To not cite software is plagiarism and violates intellectual properties of the authors of the software. +- Did you proposed at least three independent reviewers? + + +# Frequently asked questions + + +- *My citation shows all authors and not the typically shown et al.*. Answer: this is ok. We like to show all authors in the text. +- *When I submit a paper, how long does it take to be published?*. Answer: The average time from submission to publication is approx. 132 days. But it heavily depends if you can make satisfying revisions in time. +- *In which databases is AJS indexed.* Answer: we are indexed in many of them, most notable is Scopus (from Elsevier). More information can be found at the website of AJS. +- *Can I upload my paper on \href{https://arxiv.org/}{https://arxiv.org/} and distribute before the paper is online at AJS?* Answer: Of course, you can do it. However, please clearly point out in the header of the paper that this paper is under review in the Austrian Journal of Statistics and will likely be published there. Note that the readers should check if the paper is already be published at AJS for correct citation, i.e. finally the journal should be cited. Update and upload \href{https://arxiv.org/}{https://arxiv.org/} or similar sites with the final version in AJS style after the paper is published in AJS. + + + diff --git a/inst/rmarkdown/templates/ajs/template.yaml b/inst/rmarkdown/templates/ajs/template.yaml new file mode 100644 index 000000000..aca64b08a --- /dev/null +++ b/inst/rmarkdown/templates/ajs/template.yaml @@ -0,0 +1,5 @@ +name: Austrian Journal of Statistics +description: > + Template for creating an article for submission to AJS +create_dir: true + diff --git a/man/ajs_article.Rd b/man/ajs_article.Rd new file mode 100644 index 000000000..da58c455b --- /dev/null +++ b/man/ajs_article.Rd @@ -0,0 +1,29 @@ +% Generated by roxygen2: do not edit by hand +% Please edit documentation in R/ajs_article.R +\name{ajs_article} +\alias{ajs_article} +\title{Austrian Journal of Statistics (AJS) format.} +\usage{ +ajs_article( + ..., + keep_tex = TRUE, + citation_package = "natbib", + pandoc_args = NULL +) +} +\arguments{ +\item{...}{Arguments to \code{rmarkdown::pdf_document}} + +\item{keep_tex}{Keep the intermediate tex file used in the conversion to PDF} + +\item{citation_package}{The LaTeX package to process citations, \code{natbib} +or \code{biblatex}. Use \code{default} if neither package is to be used, +which means citations will be processed via the command +\command{pandoc-citeproc}.} + +\item{pandoc_args}{Additional command line options to pass to pandoc} +} +\description{ +Format for creating a Austrian Journal of Statistics (AJS) article. Adapted +from \url{https://www.jstatsoft.org/about/submissions}. +} diff --git a/man/article.Rd b/man/article.Rd index 3b52aa2f0..ce9a030d1 100644 --- a/man/article.Rd +++ b/man/article.Rd @@ -15,11 +15,9 @@ \alias{ctex} \alias{elsevier_article} \alias{frontiers_article} -\alias{glossa_article} \alias{ims_article} \alias{jasa_article} \alias{lipics_article} -\alias{jedm_article} \alias{mdpi_article} \alias{mnras_article} \alias{oup_article} @@ -82,8 +80,6 @@ elsevier_article( frontiers_article(..., keep_tex = TRUE) -glossa_article(..., keep_tex = TRUE, latex_engine = "xelatex") - ims_article( journal = c("aoas", "aap", "aop", "aos", "sts"), keep_tex = TRUE, @@ -108,8 +104,6 @@ lipics_article( md_extensions = c("-autolink_bare_uris", "-auto_identifiers") ) -jedm_article(..., keep_tex = TRUE, citation_package = "natbib") - mdpi_article(..., keep_tex = TRUE) mnras_article(..., keep_tex = TRUE, fig_caption = TRUE) @@ -230,13 +224,6 @@ custom Pandoc LaTeX template and different default values for other arguments \url{https://www.frontiersin.org/about/author-guidelines}. } -\section{\code{glossa_article}}{ - Format for creating submissions to Glossa: a - journal of general linguistics. Author Guidelines are available on - \href{https://www.glossa-journal.org/site/author-guidelines/}{www.glossa-journal.org}. - Template is adapted from \url{https://github.com/guidovw/Glossalatex}. -} - \section{\code{ims_article}}{ Format for creating submissions to the Institute of Mathematical Statistics \href{https://imstat.org/}{IMS} journals and publications. Adapted from @@ -268,12 +255,6 @@ The argument \code{journal} accepts the acronym of any of the Project Public License (LPPL), Version 1.3c. } -\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}. -} - \section{\code{mdpi_article}}{ Format for creating submissions to Multidisciplinary Digital Publishing Institute (MDPI) journals. Adapted diff --git a/tests/testit/test-formats.R b/tests/testit/test-formats.R index 67558fef2..0cfab84f4 100644 --- a/tests/testit/test-formats.R +++ b/tests/testit/test-formats.R @@ -34,6 +34,7 @@ test_format("acm") test_format("acs") test_format("aea") test_format("agu") +test_format("ajs") test_format("amq") test_format("ams") test_format("arxiv") @@ -44,7 +45,6 @@ test_format("copernicus") if (xfun::is_linux()) test_format("ctex") # only on linux due to fonts requirements test_format("elsevier") test_format("frontiers") -test_format("glossa") test_format("ieee") test_format("ims") test_format("ims", output_options = list(journal = "aap")) From bcabf1f010350ec0fa43627b3e86e178cf3c261a Mon Sep 17 00:00:00 2001 From: christophe dervieux Date: Tue, 7 Sep 2021 17:52:15 +0200 Subject: [PATCH 02/13] Functions from article.R should not be deleted --- R/article.R | 25 +++++++++++++++++++++++++ 1 file changed, 25 insertions(+) diff --git a/R/article.R b/R/article.R index 92ee651a3..16c4be0f2 100644 --- a/R/article.R +++ b/R/article.R @@ -176,6 +176,19 @@ frontiers_article <- function(..., keep_tex = TRUE) { pdf_document_format("frontiers", keep_tex = keep_tex, ...) } + +#' @section \code{glossa_article}: Format for creating submissions to Glossa: a +#' journal of general linguistics. Author Guidelines are available on +#' \href{https://www.glossa-journal.org/site/author-guidelines/}{www.glossa-journal.org}. +#' Template is adapted from \url{https://github.com/guidovw/Glossalatex}. +#' @export +#' @rdname article +glossa_article <- function(..., keep_tex = TRUE, latex_engine = "xelatex") { + pdf_document_format( + "glossa", keep_tex = keep_tex, latex_engine = latex_engine, ... + ) +} + #' @param journal one of \code{"aoas"}, \code{"aap"}, \code{"aop"}, \code{"aos"}, \code{"sts"} for \code{ims_article} #' @section \code{ims_article}: Format for creating submissions to the Institute of Mathematical Statistics #' \href{https://imstat.org/}{IMS} journals and publications. Adapted from @@ -258,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}. From 6d7862e6792d254baf55b9501d07f02a8f2527b2 Mon Sep 17 00:00:00 2001 From: christophe dervieux Date: Tue, 7 Sep 2021 17:52:45 +0200 Subject: [PATCH 03/13] Fix also namespace and doc --- NAMESPACE | 2 ++ man/article.Rd | 19 +++++++++++++++++++ 2 files changed, 21 insertions(+) diff --git a/NAMESPACE b/NAMESPACE index 9efa97a72..ce3f5060a 100644 --- a/NAMESPACE +++ b/NAMESPACE @@ -17,9 +17,11 @@ export(ctex) export(ctex_article) export(elsevier_article) export(frontiers_article) +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/man/article.Rd b/man/article.Rd index ce9a030d1..3b52aa2f0 100644 --- a/man/article.Rd +++ b/man/article.Rd @@ -15,9 +15,11 @@ \alias{ctex} \alias{elsevier_article} \alias{frontiers_article} +\alias{glossa_article} \alias{ims_article} \alias{jasa_article} \alias{lipics_article} +\alias{jedm_article} \alias{mdpi_article} \alias{mnras_article} \alias{oup_article} @@ -80,6 +82,8 @@ elsevier_article( frontiers_article(..., keep_tex = TRUE) +glossa_article(..., keep_tex = TRUE, latex_engine = "xelatex") + ims_article( journal = c("aoas", "aap", "aop", "aos", "sts"), keep_tex = TRUE, @@ -104,6 +108,8 @@ lipics_article( md_extensions = c("-autolink_bare_uris", "-auto_identifiers") ) +jedm_article(..., keep_tex = TRUE, citation_package = "natbib") + mdpi_article(..., keep_tex = TRUE) mnras_article(..., keep_tex = TRUE, fig_caption = TRUE) @@ -224,6 +230,13 @@ custom Pandoc LaTeX template and different default values for other arguments \url{https://www.frontiersin.org/about/author-guidelines}. } +\section{\code{glossa_article}}{ + Format for creating submissions to Glossa: a + journal of general linguistics. Author Guidelines are available on + \href{https://www.glossa-journal.org/site/author-guidelines/}{www.glossa-journal.org}. + Template is adapted from \url{https://github.com/guidovw/Glossalatex}. +} + \section{\code{ims_article}}{ Format for creating submissions to the Institute of Mathematical Statistics \href{https://imstat.org/}{IMS} journals and publications. Adapted from @@ -255,6 +268,12 @@ The argument \code{journal} accepts the acronym of any of the Project Public License (LPPL), Version 1.3c. } +\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}. +} + \section{\code{mdpi_article}}{ Format for creating submissions to Multidisciplinary Digital Publishing Institute (MDPI) journals. Adapted From c31d869486a79569f367da28139bacb85b4b6f36 Mon Sep 17 00:00:00 2001 From: christophe dervieux Date: Tue, 7 Sep 2021 17:57:00 +0200 Subject: [PATCH 04/13] fix NEWS.md too [skip ci] --- NEWS.md | 10 ++++++++-- 1 file changed, 8 insertions(+), 2 deletions(-) diff --git a/NEWS.md b/NEWS.md index 3363e2a85..292c1e731 100644 --- a/NEWS.md +++ b/NEWS.md @@ -1,5 +1,11 @@ # rticles 0.21 +- New `jedm_article()` for the Journal of Educational Data Mining template (thanks, @jooyoungseo, #251). + +- New `ajs_article()` for *Austrian Journal of Statistics* (thanks, @matthias-da, #437). + +- 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). - Template for `tf_article()` gains a `classoption` variable (thanks, @statzhero, #434). @@ -10,11 +16,11 @@ - `bioinformatics_article()` now separates `manuscript_type` (e.g., Applications note, Original article) and `subject_section` (e.g. Genome analysis, Phylogenetics) in template and skeleton (thanks, @stephenturner, #415) -- Add article template `ajs_article()` for *Austrian Journal of Statistics* (thanks, @matthias-da) +- Update Copernicus Publications template to version 6.3 from 2021-07-08 (thanks, @RLumSK, #432). # rticles 0.20 -- `lipics_article()` skeleton now sets option `bookdown.theorem.preamble` to FALSE to work with `bookdown::pdf_book()` and avoid conflicst in theorem environment definition. This requires **bookdown** 0.23 or higher (#392). +- `lipics_article()` skeleton now sets option `bookdown.theorem.preamble` to FALSE to work with `bookdown::pdf_book()` and avoid conflicts in theorem environment definition. This requires **bookdown** 0.23 or higher (#392). - `oup_article()` template now largely compatible to that of `elsevier_article()` (thanks, @dmkaplan2000, #403) From 371a555afbac322e6ddf456d4d0fabe58c75035b Mon Sep 17 00:00:00 2001 From: christophe dervieux Date: Tue, 7 Sep 2021 17:58:13 +0200 Subject: [PATCH 05/13] fix test file too --- tests/testit/test-formats.R | 1 + 1 file changed, 1 insertion(+) diff --git a/tests/testit/test-formats.R b/tests/testit/test-formats.R index 0cfab84f4..08a06eb25 100644 --- a/tests/testit/test-formats.R +++ b/tests/testit/test-formats.R @@ -45,6 +45,7 @@ test_format("copernicus") if (xfun::is_linux()) test_format("ctex") # only on linux due to fonts requirements test_format("elsevier") test_format("frontiers") +test_format("glossa") test_format("ieee") test_format("ims") test_format("ims", output_options = list(journal = "aap")) From 89fa083836052d5c75ddc43c9ba339269c157b11 Mon Sep 17 00:00:00 2001 From: christophe dervieux Date: Thu, 9 Sep 2021 12:00:00 +0200 Subject: [PATCH 06/13] `ajs_article()` is a wrapper around `jss_article()` --- R/ajs_article.R | 70 ---------- R/jss_article.R | 24 ++++ .../templates/ajs/resources/template.tex | 124 ------------------ .../templates/ajs/skeleton/skeleton.Rmd | 1 - man/ajs_article.Rd | 2 +- 5 files changed, 25 insertions(+), 196 deletions(-) delete mode 100644 R/ajs_article.R delete mode 100644 inst/rmarkdown/templates/ajs/resources/template.tex diff --git a/R/ajs_article.R b/R/ajs_article.R deleted file mode 100644 index 7991c9fc2..000000000 --- a/R/ajs_article.R +++ /dev/null @@ -1,70 +0,0 @@ -#' Austrian Journal of Statistics (AJS) format. -#' -#' Format for creating a Austrian Journal of Statistics (AJS) article. Adapted -#' from \url{https://www.jstatsoft.org/about/submissions}. -#' @inheritParams rmarkdown::pdf_document -#' @param ... Arguments to \code{rmarkdown::pdf_document} -#' @export -ajs_article <- function( - ..., keep_tex = TRUE, citation_package = 'natbib', - pandoc_args = NULL -) { - - rmarkdown::pandoc_available('2.2', TRUE) - - pandoc_args <- c( - pandoc_args, - "--lua-filter", pkg_file("rmarkdown", "lua", "short-title.lua") - ) - - base <- pdf_document_format( - "ajs", keep_tex = keep_tex, citation_package = citation_package, - pandoc_args = pandoc_args, ... - ) - - # Mostly copied from knitr::render_sweave - base$knitr$opts_knit$out.format <- "sweave" - - base$knitr$opts_chunk <- merge_list(base$knitr$opts_chunk, list( - prompt = TRUE, comment = NA, highlight = FALSE, tidy = FALSE, - dev.args = list(pointsize = 11), fig.align = "center", - R.options = list(prompt = 'R> ', continue = '+ '), - fig.width = 4.9, # 6.125" * 0.8, as in template - fig.height = 3.675 # 4.9 * 3:4 - )) - - base$pandoc$ext <- '.tex' - post <- base$post_processor - # a hack for https://github.com/rstudio/rticles/issues/100 to add \AND to the author list - base$post_processor <- function(metadata, input, output, clean, verbose) { - if (is.function(post)) output = post(metadata, input, output, clean, verbose) - f <- xfun::with_ext(output, '.tex') - x <- xfun::read_utf8(f) - x <- gsub('(\\\\AND )\\\\And ', '\\1', x) - x <- gsub(' \\\\AND(\\\\\\\\)$', '\\1', x) - xfun::write_utf8(x, f) - tinytex::latexmk( - f, base$pandoc$latex_engine, - if ('--biblatex' %in% base$pandoc$args) 'biber' else 'bibtex' - ) - } - - set_sweave_hooks(base, c('CodeInput', 'CodeOutput', 'CodeChunk')) -} - -# wrap the content in a raw latex block -latex_block <- function(hook) { - force(hook) - function(x, options) { - x2 <- hook(x, options) - if (identical(x, x2)) x else paste0('```{=latex}\n', x2, '\n```') - } -} - -# use knitr's sweave hooks, but wrap chunk output in raw latex blocks -set_sweave_hooks <- function(base, ...) { - hooks <- knitr::hooks_sweave(...) - hooks[['chunk']] <- latex_block(hooks[['chunk']]) - base$knitr$knit_hooks <- merge_list(base$knitr$knit_hooks, hooks) - base -} diff --git a/R/jss_article.R b/R/jss_article.R index dbc7e708f..81f7a72da 100644 --- a/R/jss_article.R +++ b/R/jss_article.R @@ -52,6 +52,30 @@ jss_article <- function( set_sweave_hooks(base, c('CodeInput', 'CodeOutput', 'CodeChunk')) } +#' Austrian Journal of Statistics (AJS) format. +#' +#' Format for creating a Austrian Journal of Statistics (AJS) article. Adapted +#' from \url{https://www.jstatsoft.org/about/submissions}. +#' @inheritParams jss_article +#' @importFrom rmarkdown pandoc_variable_arg +#' @export +ajs_article <- function( + ..., keep_tex = TRUE, citation_package = 'natbib', + pandoc_args = NULL +) { + # set documentclass to ajs for this template + pandoc_args <- c(pandoc_args, + rmarkdown::pandoc_variable_arg("documentclass", "ajs") + ) + + jss_article(..., + keep_tex = keep_tex, + citation_package = citation_package, + pandoc_args = pandoc_args + ) + +} + # wrap the content in a raw latex block latex_block <- function(hook) { force(hook) diff --git a/inst/rmarkdown/templates/ajs/resources/template.tex b/inst/rmarkdown/templates/ajs/resources/template.tex deleted file mode 100644 index d2af69891..000000000 --- a/inst/rmarkdown/templates/ajs/resources/template.tex +++ /dev/null @@ -1,124 +0,0 @@ -\documentclass[ -$for(classoption)$ - $classoption$$sep$, -$endfor$ -]{$documentclass$} - -\usepackage[utf8]{inputenc} - -\providecommand{\tightlist}{% - \setlength{\itemsep}{0pt}\setlength{\parskip}{0pt}} - -\author{ -$for(author)$$author.name$\\$author.affiliation$$sep$ \And $endfor$ -} -\title{$title.formatted$} - -\Plainauthor{$for(author)$$author.name$$sep$, $endfor$} -$if(title.plain)$ -\Plaintitle{$title.plain$} -$endif$ -$if(title.short)$ -\Shorttitle{$title.short$} -$endif$ - - -\Abstract{ -$abstract$ -} - -$if(keywords.formatted)$ -\Keywords{$for(keywords.formatted)$$keywords.formatted$$sep$, $endfor$} -$endif$ -$if(keywords.plain)$ -\Plainkeywords{$for(keywords.plain)$$keywords.plain$$sep$, $endfor$} -$endif$ - -%% publication information -%% \Volume{50} -%% \Issue{9} -%% \Month{June} -%% \Year{2012} -%% \Submitdate{$submitdate$} -%% \Acceptdate{2012-06-04} - -\Address{ -$for(author)$ - $if(author.address)$ - $author.name$\\ - $if(author.affiliation2)$ - $author.affiliation2$\\ - $else$ - $author.affiliation$\\ - $endif$ - $author.address$\\ - $if(author.email)$E-mail: $author.email$\\$endif$ - $if(author.url)$URL: $author.url$\\~\\$endif$ - $endif$ -$endfor$ -} - -% 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$ - -$preamble$ - -\begin{document} - -$body$ - -$if(natbib)$ -$if(bibliography)$ -$if(biblio-title)$ -$if(book-class)$ -\renewcommand\bibname{$biblio-title$} -$else$ -\renewcommand\refname{$biblio-title$} -$endif$ -$endif$ -\bibliography{$for(bibliography)$$bibliography$$sep$,$endfor$} -$endif$ -$endif$ - -$if(biblatex)$ -\printbibliography$if(biblio-title)$[title=$biblio-title$]$endif$ -$endif$ - -\end{document} - diff --git a/inst/rmarkdown/templates/ajs/skeleton/skeleton.Rmd b/inst/rmarkdown/templates/ajs/skeleton/skeleton.Rmd index 36517454f..233ef372e 100644 --- a/inst/rmarkdown/templates/ajs/skeleton/skeleton.Rmd +++ b/inst/rmarkdown/templates/ajs/skeleton/skeleton.Rmd @@ -1,5 +1,4 @@ --- -documentclass: ajs author: - name: FirstName LastName affiliation: University/Company diff --git a/man/ajs_article.Rd b/man/ajs_article.Rd index da58c455b..71041d5be 100644 --- a/man/ajs_article.Rd +++ b/man/ajs_article.Rd @@ -1,5 +1,5 @@ % Generated by roxygen2: do not edit by hand -% Please edit documentation in R/ajs_article.R +% Please edit documentation in R/jss_article.R \name{ajs_article} \alias{ajs_article} \title{Austrian Journal of Statistics (AJS) format.} From 8b1c7fccc6edec03bd109f3a5a31104cc40b68dc Mon Sep 17 00:00:00 2001 From: christophe dervieux Date: Thu, 9 Sep 2021 12:02:54 +0200 Subject: [PATCH 07/13] Bump version --- DESCRIPTION | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/DESCRIPTION b/DESCRIPTION index 88aa7049d..ce5979177 100644 --- a/DESCRIPTION +++ b/DESCRIPTION @@ -1,7 +1,7 @@ Package: rticles Type: Package Title: Article Formats for R Markdown -Version: 0.20.4 +Version: 0.20.7 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")), From 906c26272fa27b51bee90b65e03334cf75207868 Mon Sep 17 00:00:00 2001 From: christophe dervieux Date: Thu, 9 Sep 2021 12:06:33 +0200 Subject: [PATCH 08/13] Rebuild README --- README.md | 1 + 1 file changed, 1 insertion(+) diff --git a/README.md b/README.md index 7476e1e77..300e3811f 100644 --- a/README.md +++ b/README.md @@ -73,6 +73,7 @@ Currently included templates and their contributors are the following: | [ACS](https://pubs.acs.org) | [@yufree](https://github.com/yufree) | [#15](https://github.com/rstudio/rticles/pull/15) | `acs_article()` | | [AEA: American Economic Association](https://www.aeaweb.org/journals/policies/templates) | [@sboysel](https://github.com/sboysel) | [#86](https://github.com/rstudio/rticles/pull/86) | `aea_articles()` | | [AGU](https://agupubs.onlinelibrary.wiley.com/) | [@eliocamp](https://github.com/eliocamp) | [#199](https://github.com/rstudio/rticles/pull/99) | `agu_article()` | +| \[AJS: Austrian Journal of Statistics\]( | | | `ajs_article()` | | [AMS: American Meteorological Society](https://www.ametsoc.org/) | [@yufree](https://github.com/yufree) | [#96](https://github.com/rstudio/rticles/pull/96) | `ams_article()` | | [ASA: American Statistical Association](https://www.amstat.org/) | | [#111](https://github.com/rstudio/rticles/pull/111) | `asa_article()` | | [arXiv](https://arxiv.org/) pre-prints based on George Kour’s template | [@alexpghayes](https://github.com) | [#236](https://github.com/rstudio/rticles/pull/236) | `arxiv_article()` | From 32a7e114018bdf55c39e753e7de7ae02efbc8731 Mon Sep 17 00:00:00 2001 From: christophe dervieux Date: Thu, 9 Sep 2021 12:09:35 +0200 Subject: [PATCH 09/13] Add info in table [skip ci] --- README.Rmd | 4 ++-- README.md | 4 ++-- 2 files changed, 4 insertions(+), 4 deletions(-) diff --git a/README.Rmd b/README.Rmd index cc00b57b4..204b47248 100644 --- a/README.Rmd +++ b/README.Rmd @@ -46,8 +46,8 @@ Currently included templates and their contributors are the following: | [ACM: Association for Computings Machinery](https://www.acm.org/publications/about-publications) | [\@ramnathv](https://github.com/ramnathv)| [\#8](https://github.com/rstudio/rticles/pull/8) | `acm_article()`| | [ACS](https://pubs.acs.org) | [\@yufree](https://github.com/yufree)| [\#15](https://github.com/rstudio/rticles/pull/15) | `acs_article()`| | [AEA: American Economic Association](https://www.aeaweb.org/journals/policies/templates)| [\@sboysel](https://github.com/sboysel)| [\#86](https://github.com/rstudio/rticles/pull/86) | `aea_articles()` | -| [AGU](https://agupubs.onlinelibrary.wiley.com/) | [\@eliocamp](https://github.com/eliocamp)| [\#199](https://github.com/rstudio/rticles/pull/99)| `agu_article()`| -| [AJS: Austrian Journal of Statistics](https://www.ajs.or.at ||| `ajs_article()`| +| [AGU](https://agupubs.onlinelibrary.wiley.com/) | [\@eliocamp](https://github.com/eliocamp)| [\#199](https://github.com/rstudio/rticles/pull/199)| `agu_article()`| +| [AJS: Austrian Journal of Statistics](https://www.ajs.or.at |[\@mathias-da](https://github.com/mathias-da)|[\#437](https://github.com/rstudio/rticles/pull/437)| `ajs_article()`| | [AMS: American Meteorological Society](https://www.ametsoc.org/)| [\@yufree](https://github.com/yufree)| [\#96](https://github.com/rstudio/rticles/pull/96) | `ams_article()`| | [ASA: American Statistical Association](https://www.amstat.org/)|| [\#111](https://github.com/rstudio/rticles/pull/111) | `asa_article()`| | [arXiv](https://arxiv.org/) pre-prints based on George Kour's template| [\@alexpghayes](https://github.com)| [\#236](https://github.com/rstudio/rticles/pull/236) | `arxiv_article()`| diff --git a/README.md b/README.md index 300e3811f..1f0cead85 100644 --- a/README.md +++ b/README.md @@ -72,8 +72,8 @@ Currently included templates and their contributors are the following: | [ACM: Association for Computings Machinery](https://www.acm.org/publications/about-publications) | [@ramnathv](https://github.com/ramnathv) | [#8](https://github.com/rstudio/rticles/pull/8) | `acm_article()` | | [ACS](https://pubs.acs.org) | [@yufree](https://github.com/yufree) | [#15](https://github.com/rstudio/rticles/pull/15) | `acs_article()` | | [AEA: American Economic Association](https://www.aeaweb.org/journals/policies/templates) | [@sboysel](https://github.com/sboysel) | [#86](https://github.com/rstudio/rticles/pull/86) | `aea_articles()` | -| [AGU](https://agupubs.onlinelibrary.wiley.com/) | [@eliocamp](https://github.com/eliocamp) | [#199](https://github.com/rstudio/rticles/pull/99) | `agu_article()` | -| \[AJS: Austrian Journal of Statistics\]( | | | `ajs_article()` | +| [AGU](https://agupubs.onlinelibrary.wiley.com/) | [@eliocamp](https://github.com/eliocamp) | [#199](https://github.com/rstudio/rticles/pull/199) | `agu_article()` | +| \[AJS: Austrian Journal of Statistics\]( | [@mathias-da](https://github.com/mathias-da) | [#437](https://github.com/rstudio/rticles/pull/437) | `ajs_article()` | | [AMS: American Meteorological Society](https://www.ametsoc.org/) | [@yufree](https://github.com/yufree) | [#96](https://github.com/rstudio/rticles/pull/96) | `ams_article()` | | [ASA: American Statistical Association](https://www.amstat.org/) | | [#111](https://github.com/rstudio/rticles/pull/111) | `asa_article()` | | [arXiv](https://arxiv.org/) pre-prints based on George Kour’s template | [@alexpghayes](https://github.com) | [#236](https://github.com/rstudio/rticles/pull/236) | `arxiv_article()` | From 309032014f80e3dba88d8dbc9c280d3c588d8d27 Mon Sep 17 00:00:00 2001 From: christophe dervieux Date: Thu, 9 Sep 2021 12:19:49 +0200 Subject: [PATCH 10/13] Fix README --- README.Rmd | 2 ++ README.md | 2 ++ 2 files changed, 4 insertions(+) diff --git a/README.Rmd b/README.Rmd index 204b47248..d0176bf1f 100644 --- a/README.Rmd +++ b/README.Rmd @@ -58,9 +58,11 @@ Currently included templates and their contributors are the following: | [CTeX](https://ctan.org/pkg/ctex) ||| `ctex()` | | [Elsevier](https://www.elsevier.com)| [\@cboettig](https://github.com/cboettig)| [\#27](https://github.com/rstudio/rticles/pull/27) | `elsevier_article()` | | [Frontiers](https://www.frontiersin.org/) | [\@muschellij2](https://github.com/muschellij2)| [\#211](https://github.com/rstudio/rticles/pull/211) | `frontiers_article()`| +| [Glossa](https://www.glossa-journal.org) | [\@stefanocoretta](https://github.com/stefanocoretta) | [#361](https://github.com/rstudio/rticles/pull/361) | `glossa_article()` | | [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/README.md b/README.md index 1f0cead85..c53aedef9 100644 --- a/README.md +++ b/README.md @@ -84,9 +84,11 @@ Currently included templates and their contributors are the following: | [CTeX](https://ctan.org/pkg/ctex) | | | `ctex()` | | [Elsevier](https://www.elsevier.com) | [@cboettig](https://github.com/cboettig) | [#27](https://github.com/rstudio/rticles/pull/27) | `elsevier_article()` | | [Frontiers](https://www.frontiersin.org/) | [@muschellij2](https://github.com/muschellij2) | [#211](https://github.com/rstudio/rticles/pull/211) | `frontiers_article()` | +| [Glossa](https://www.glossa-journal.org) | [@stefanocoretta](https://github.com/stefanocoretta) | [#361](https://github.com/rstudio/rticles/pull/361) | `glossa_article()` | | [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()` | From afffceaa9ad76891b7e667d8ac389fa135198ecc Mon Sep 17 00:00:00 2001 From: christophe dervieux Date: Thu, 9 Sep 2021 12:30:34 +0200 Subject: [PATCH 11/13] Update Template menu name [skip ci] --- inst/rmarkdown/templates/ajs/template.yaml | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/inst/rmarkdown/templates/ajs/template.yaml b/inst/rmarkdown/templates/ajs/template.yaml index aca64b08a..691758e0f 100644 --- a/inst/rmarkdown/templates/ajs/template.yaml +++ b/inst/rmarkdown/templates/ajs/template.yaml @@ -1,4 +1,4 @@ -name: Austrian Journal of Statistics +name: AJS - Austrian Journal of Statistics description: > Template for creating an article for submission to AJS create_dir: true From f631e8b985a0c9ff6814bee15a174fef87750ef0 Mon Sep 17 00:00:00 2001 From: christophe dervieux Date: Thu, 9 Sep 2021 12:32:01 +0200 Subject: [PATCH 12/13] typo --- README.Rmd | 2 +- README.md | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/README.Rmd b/README.Rmd index d0176bf1f..aadef97d4 100644 --- a/README.Rmd +++ b/README.Rmd @@ -47,7 +47,7 @@ Currently included templates and their contributors are the following: | [ACS](https://pubs.acs.org) | [\@yufree](https://github.com/yufree)| [\#15](https://github.com/rstudio/rticles/pull/15) | `acs_article()`| | [AEA: American Economic Association](https://www.aeaweb.org/journals/policies/templates)| [\@sboysel](https://github.com/sboysel)| [\#86](https://github.com/rstudio/rticles/pull/86) | `aea_articles()` | | [AGU](https://agupubs.onlinelibrary.wiley.com/) | [\@eliocamp](https://github.com/eliocamp)| [\#199](https://github.com/rstudio/rticles/pull/199)| `agu_article()`| -| [AJS: Austrian Journal of Statistics](https://www.ajs.or.at |[\@mathias-da](https://github.com/mathias-da)|[\#437](https://github.com/rstudio/rticles/pull/437)| `ajs_article()`| +| [AJS: Austrian Journal of Statistics](https://www.ajs.or.at |[\@matthias-da](https://github.com/matthias-da)|[\#437](https://github.com/rstudio/rticles/pull/437)| `ajs_article()`| | [AMS: American Meteorological Society](https://www.ametsoc.org/)| [\@yufree](https://github.com/yufree)| [\#96](https://github.com/rstudio/rticles/pull/96) | `ams_article()`| | [ASA: American Statistical Association](https://www.amstat.org/)|| [\#111](https://github.com/rstudio/rticles/pull/111) | `asa_article()`| | [arXiv](https://arxiv.org/) pre-prints based on George Kour's template| [\@alexpghayes](https://github.com)| [\#236](https://github.com/rstudio/rticles/pull/236) | `arxiv_article()`| diff --git a/README.md b/README.md index c53aedef9..d87f06856 100644 --- a/README.md +++ b/README.md @@ -73,7 +73,7 @@ Currently included templates and their contributors are the following: | [ACS](https://pubs.acs.org) | [@yufree](https://github.com/yufree) | [#15](https://github.com/rstudio/rticles/pull/15) | `acs_article()` | | [AEA: American Economic Association](https://www.aeaweb.org/journals/policies/templates) | [@sboysel](https://github.com/sboysel) | [#86](https://github.com/rstudio/rticles/pull/86) | `aea_articles()` | | [AGU](https://agupubs.onlinelibrary.wiley.com/) | [@eliocamp](https://github.com/eliocamp) | [#199](https://github.com/rstudio/rticles/pull/199) | `agu_article()` | -| \[AJS: Austrian Journal of Statistics\]( | [@mathias-da](https://github.com/mathias-da) | [#437](https://github.com/rstudio/rticles/pull/437) | `ajs_article()` | +| \[AJS: Austrian Journal of Statistics\]( | [@matthias-da](https://github.com/matthias-da) | [#437](https://github.com/rstudio/rticles/pull/437) | `ajs_article()` | | [AMS: American Meteorological Society](https://www.ametsoc.org/) | [@yufree](https://github.com/yufree) | [#96](https://github.com/rstudio/rticles/pull/96) | `ams_article()` | | [ASA: American Statistical Association](https://www.amstat.org/) | | [#111](https://github.com/rstudio/rticles/pull/111) | `asa_article()` | | [arXiv](https://arxiv.org/) pre-prints based on George Kour’s template | [@alexpghayes](https://github.com) | [#236](https://github.com/rstudio/rticles/pull/236) | `arxiv_article()` | From 3efeb5a0ec9e2a699af185a822765aa5122f8402 Mon Sep 17 00:00:00 2001 From: Christophe Dervieux Date: Thu, 9 Sep 2021 16:26:27 +0200 Subject: [PATCH 13/13] Apply suggestions from code review --- inst/rmarkdown/templates/ajs/skeleton/skeleton.Rmd | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/inst/rmarkdown/templates/ajs/skeleton/skeleton.Rmd b/inst/rmarkdown/templates/ajs/skeleton/skeleton.Rmd index 233ef372e..188596c4b 100644 --- a/inst/rmarkdown/templates/ajs/skeleton/skeleton.Rmd +++ b/inst/rmarkdown/templates/ajs/skeleton/skeleton.Rmd @@ -33,8 +33,8 @@ keywords: # at least one keyword must be supplied formatted: [keywords, not capitalized, "\\proglang{Java}"] plain: [keywords, not capitalized, Java] -preamble: > - \usepackage{amsmath} +header-includes: + - \usepackage{amsmath} output: rticles::ajs_article --- @@ -65,7 +65,7 @@ The style file of the Austrian Journal of Statistics is based on the style file The Austrian Journal of Statistics is freely available over the net. Free and open-source tools used for production of your manuscript are therefore also highly supported. Code to reproduce the figures and tables in manuscripts as well as methods implemented in software can be published as supplementary material. This increases usually the number of downloads of your article. -\section{Writing your manuscript} +# Writing your manuscript The Journal is produced on the basis of computer readable manuscripts provided by the authors. @@ -160,7 +160,7 @@ The Austrian Journal of Statistics is free of charge. Generally, we use the Creative Commons Attribution License (CC-BY). For copyright issues, publication ethics and malpractice statements, please have a look at -\href{www.ajs.or.at}{www.ajs.or.at} +