fsfsfs

NEWS.md

@@ -5,6 +5,7 @@
 - `cv2` is an updated version of `cv`, which I use now for my academic CV.
 - `syllabus` now has the ability to add third and fourth co-teachers.
 - `beamer` has some hacks (sic) for two-column layouts.
+- `syllabus2` is another syllabus template for me now that I moved to Stockholm University and have a wildly different format to classes.
 
 # stevetemplates 1.0.0
 

R/syllabus2.R

@@ -0,0 +1,50 @@
+#' Steve's 2nd Syllabus Template
+#'
+#' This is the R Markdown template I use for my syllabi. For
+#' a discussion of some of its features, see here:
+#' <http://svmiller.com/blog/2016/07/r-markdown-syllabus/>. The skeleton also
+#' includes code for a calendar. I discuss this here:
+#' <http://svmiller.com/blog/2020/08/a-ggplot-calendar-for-your-semester/>
+#'
+#' # About YAML header fields
+#'
+#' | FIELD  | DESCRIPTION |
+#' | ------ | ----------- |
+#' | `title` | Title of the class |
+#' | `author` | Name(s) of the professor(s) |
+#' | `date` | The semester |
+#' | `email` | Your email. Technically optional, but you really should use it. |
+#' | `web` | Class website. Technically optional, but you really should use it. |
+#' | `officehours` | Your office hours. Technically optional, but you really should use it. |
+#' | `office` | Your office location. Technically optional, but you really should use it. |
+#' | `classroom` | The classroom location. Technically optional, but you really should use it. |
+#' | `classhours` | When/for how long the class meets in a given session. Technically optional, but you really should use it. |
+#' | `coteaching` | If TRUE, changes format to allow for a second (third, or fourth) co-teacher |
+#'
+#' # Additional Comments
+#'
+#' There is a nested conditionality for co-teachers. If `coteaching` is TRUE,
+#' format changes to allow a second teacher. Conditional on `coteaching` being
+#' TRUE *and* there being an `email3` entry, a third co-teacher is added and
+#' entries for the third teacher's office hours and office are assumed. If
+#' `coteaching` is TRUE, `email3` has an entry *and* there is an `email4` entry,
+#' a fourth co-teacher is added.
+#'
+#' @inheritParams rmarkdown::pdf_document
+#' @param ... Arguments to [`rmarkdown::pdf_document`].
+#' @md
+#' @export
+#'
+syllabus2 <- function(...){
+  templ <- system.file("rmarkdown", "templates", "syllabus2", "resources", "template.tex", package = "stevetemplates")
+  rmarkdown::pdf_document(template = templ,
+                          ...)
+}
+
+#' @rdname syllabus2
+#' @export
+#'
+templ_syllabus2 <- function(){
+  print(system.file("rmarkdown", "templates", "syllabus2", "resources", "template.tex", package = "stevetemplates"))
+}
+

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

@@ -403,7 +403,7 @@
 % \sectionfont{\rmfamily\mdseries\large\bf\ulemheading}
 % \subsectionfont{\rmfamily\mdseries\normalsize\scshape}
 
-\newenvironment{assbutt}[0]{\par\leftskip=2em\rightskip=2em}{\par\medskip}
+\newenvironment{asbu}[0]{\par\leftskip=2em\rightskip=2em}{\par\medskip}
 \newenvironment{columns}[1][]{}{}
 
 %\let\paragraph\oldparagraph
@@ -421,7 +421,7 @@
 \renewcommand{\paragraph}[1]{\oldparagraph{#1}\mbox{}\par}
 
 \titlespacing{\section}{0pt}{15pt}{20pt}
-% 
+%
 % \newlength{\cslhangindent}
 % \setlength{\cslhangindent}{1.5em}
 % \newlength{\csllabelwidth}
@@ -543,9 +543,9 @@
 \centerline{\huge \bf $author$}
 
 % \vspace{2 mm}
-% 
+%
 % \hrule
-% 
+%
 % \vspace{2 mm}
 \vspace{4 mm}
 
@@ -557,7 +557,7 @@
 
 
 \vspace{2 mm}
-% 
+%
 % \hrule