From e59276ef54e54d92d3d5a76cd272f8f54c5630a9 Mon Sep 17 00:00:00 2001
From: Dirk Eddelbuettel <edd@debian.org>
Date: Sun, 15 Oct 2017 09:29:32 -0500
Subject: [PATCH] very first [fully working] version

---
 DESCRIPTION                                   |  15 +
 NAMESPACE                                     |   3 +
 R/linl.R                                      |  61 ++++
 cleanup                                       |   5 +
 inst/NEWS.Rd                                  |  10 +
 .../templates/pdf/resources/template.tex      | 291 ++++++++++++++++++
 .../templates/pdf/skeleton/skeleton.Rmd       |  31 ++
 inst/rmarkdown/templates/pdf/template.yaml    |   4 +
 man/linl.Rd                                   |  48 +++
 vignettes/examples/letterhead.pdf             | Bin 0 -> 8083 bytes
 vignettes/examples/signature.pdf              | Bin 0 -> 7574 bytes
 vignettes/linl.Rmd                            |  48 +++
 12 files changed, 516 insertions(+)
 create mode 100644 DESCRIPTION
 create mode 100644 NAMESPACE
 create mode 100644 R/linl.R
 create mode 100755 cleanup
 create mode 100644 inst/NEWS.Rd
 create mode 100755 inst/rmarkdown/templates/pdf/resources/template.tex
 create mode 100644 inst/rmarkdown/templates/pdf/skeleton/skeleton.Rmd
 create mode 100644 inst/rmarkdown/templates/pdf/template.yaml
 create mode 100644 man/linl.Rd
 create mode 100644 vignettes/examples/letterhead.pdf
 create mode 100644 vignettes/examples/signature.pdf
 create mode 100755 vignettes/linl.Rmd

diff --git a/DESCRIPTION b/DESCRIPTION
new file mode 100644
index 0000000..42562f0
--- /dev/null
+++ b/DESCRIPTION
@@ -0,0 +1,15 @@
+Package: linl
+Type: Package
+Title: 'linl' is not 'PNAS'
+Version: 0.0.1
+Date: 2017-10-15
+Author: Dirk Eddelbuettel and Aaron Wolen
+Maintainer: Dirk Eddelbuettel <edd@debian.org>
+Description: A LaTeX Letter for 'rmarkdown', using the 'pandoc-letter'
+ template adapted for use with 'markdown'.
+URL: http://dirk.eddelbuettel.com/code/linl.html
+BugReports: https://github.com/eddelbuettel/linl/issues
+Imports: rmarkdown, knitr
+VignetteBuilder: knitr
+License: GPL-3
+RoxygenNote: 6.0.1
diff --git a/NAMESPACE b/NAMESPACE
new file mode 100644
index 0000000..374938f
--- /dev/null
+++ b/NAMESPACE
@@ -0,0 +1,3 @@
+export(linl)
+import(knitr)
+import(rmarkdown)
diff --git a/R/linl.R b/R/linl.R
new file mode 100644
index 0000000..bfbe5fa
--- /dev/null
+++ b/R/linl.R
@@ -0,0 +1,61 @@
+#' LaTeX Letter format
+#'
+#' A format suitable for standard letters, along a with a number of
+#' helpful extensions
+#'
+#' @inheritParams rmarkdown::pdf_document
+#' @param ... Additional arguments to \code{rmarkdown::pdf_document}
+#' @param keep_tex A boolean toggle to select whether intermediate
+#' LaTeX files are to be kept, defaults to \code{TRUE}
+#' @return R Markdown output format to pass to
+#' \code{\link[rmarkdown:render]{render}}
+#'
+#' @examples
+#' \dontrun{
+#' rmarkdown::draft("MyLetter.Rmd", template = "pdf", package = "linl")
+#' rmarkdown::render("MyLetter.Rmd")
+#' }
+#'
+#' @seealso
+#' \code{\link[pinp]{pinp}}
+#' @references
+#' JJ Allaire, R Foundation, Hadley Wickham, Journal of Statistical Software, Yihui Xie, Ramnath
+#' Vaidyanathan, Association for Computing Machinery, Carl Boettiger, Elsevier, Karl Broman,
+#' Kirill Mueller, Bastiaan Quast, Randall Pruim, Ben Marwick, Charlotte Wickham, Oliver Keyes
+#' and Miao Yu (2017). rticles: Article Formats for R Markdown. R package version 0.4.1.
+#' \url{https://CRAN.R-project.org/package=rticles}
+#'
+#' JJ Allaire, Joe Cheng, Yihui Xie, Jonathan McPherson, Winston Chang, Jeff Allen, Hadley
+#' Wickham, Aron Atkins, Rob Hyndman and Ruben Arslan (2017). rmarkdown: Dynamic Documents for R.
+#' R package version 1.6. \url{https://CRAN.R-project.org/package=rmarkdown}
+#'
+#' Yihui Xie (2017). knitr: A General-Purpose Package for Dynamic Report Generation in R. R
+#' package version 1.17.
+#'
+#' Aaron Wolen (2017). pandoc-letter. GitHub Repository. \url{https://github.com/aaronwolen/pandoc-letter}
+linl <- function(..., keep_tex = TRUE) {
+
+    template <- system.file("rmarkdown", "templates", "pdf", "resources", "template.tex",
+                            package="linl")
+    base <- inherit_pdf_document(..., template = template, keep_tex = keep_tex)
+
+    base$knitr$opts_chunk$prompt <- FALSE 	# changed from TRUE
+    base$knitr$opts_chunk$comment <- '# '	# default to one hashmark
+    base$knitr$opts_chunk$highlight <- TRUE  	# changed as well
+
+    base
+}
+
+
+# Call rmarkdown::pdf_documet and mark the return value as inheriting pdf_document
+inherit_pdf_document <- function(...) {
+    fmt <- rmarkdown::pdf_document(...)
+    fmt$inherits <- "pdf_document"
+    fmt
+}
+
+knitr_fun <- function(name) utils::getFromNamespace(name, 'knitr')
+
+output_asis <- knitr_fun('output_asis')
+
+
diff --git a/cleanup b/cleanup
new file mode 100755
index 0000000..5cca55e
--- /dev/null
+++ b/cleanup
@@ -0,0 +1,5 @@
+#!/bin/sh
+
+(cd vignettes && \
+    rm -rf jss.bst linl.bbl linl.bib linl.cls linl.pdf linl.tex linl.xwm linl_files/ && \
+    cd ..)
diff --git a/inst/NEWS.Rd b/inst/NEWS.Rd
new file mode 100644
index 0000000..312b7f8
--- /dev/null
+++ b/inst/NEWS.Rd
@@ -0,0 +1,10 @@
+\name{NEWS}
+\title{News for Package \pkg{linl}}
+\newcommand{\ghpr}{\href{https://github.com/eddelbuettel/linl/pull/#1}{##1}}
+\newcommand{\ghit}{\href{https://github.com/eddelbuettel/linl/issues/#1}{##1}}
+
+\section{Changes in tint version 0.0.1 (2017-10-15)}{
+  \itemize{
+    \item Initial CRAN release
+  }
+}
diff --git a/inst/rmarkdown/templates/pdf/resources/template.tex b/inst/rmarkdown/templates/pdf/resources/template.tex
new file mode 100755
index 0000000..360d07b
--- /dev/null
+++ b/inst/rmarkdown/templates/pdf/resources/template.tex
@@ -0,0 +1,291 @@
+\documentclass[$if(fontsize)$$fontsize$,$endif$$if(lang)$$babel-lang$,$endif$$if(papersize)$$papersize$paper,$endif$$for(classoption)$$classoption$$sep$,$endfor$]{letter}
+$if(fontfamily)$
+\usepackage[$for(fontfamilyoptions)$$fontfamilyoptions$$sep$,$endfor$]{$fontfamily$}
+$else$
+\usepackage{lmodern}
+$endif$
+$if(linestretch)$
+\usepackage{setspace}
+\setstretch{$linestretch$}
+$endif$
+\usepackage{amssymb,amsmath}
+\usepackage{ifxetex,ifluatex}
+\usepackage{fixltx2e} % provides \textsubscript
+\ifnum 0\ifxetex 1\fi\ifluatex 1\fi=0 % if pdftex
+  \usepackage[$if(fontenc)$$fontenc$$else$T1$endif$]{fontenc}
+  \usepackage[utf8]{inputenc}
+$if(euro)$
+  \usepackage{eurosym}
+$endif$
+\else % if luatex or xelatex
+  \ifxetex
+    \usepackage{mathspec}
+  \else
+    \usepackage{fontspec}
+  \fi
+  \defaultfontfeatures{Ligatures=TeX,Scale=MatchLowercase}
+$for(fontfamilies)$
+  \newfontfamily{$fontfamilies.name$}[$fontfamilies.options$]{$fontfamilies.font$}
+$endfor$
+$if(euro)$
+  \newcommand{\euro}{€}
+$endif$
+$if(mainfont)$
+    \setmainfont[$for(mainfontoptions)$$mainfontoptions$$sep$,$endfor$]{$mainfont$}
+$endif$
+$if(sansfont)$
+    \setsansfont[$for(sansfontoptions)$$sansfontoptions$$sep$,$endfor$]{$sansfont$}
+$endif$
+$if(monofont)$
+    \setmonofont[Mapping=tex-ansi$if(monofontoptions)$,$for(monofontoptions)$$monofontoptions$$sep$,$endfor$$endif$]{$monofont$}
+$endif$
+$if(mathfont)$
+    \setmathfont(Digits,Latin,Greek)[$for(mathfontoptions)$$mathfontoptions$$sep$,$endfor$]{$mathfont$}
+$endif$
+$if(CJKmainfont)$
+    \usepackage{xeCJK}
+    \setCJKmainfont[$for(CJKoptions)$$CJKoptions$$sep$,$endfor$]{$CJKmainfont$}
+$endif$
+\fi
+% use upquote if available, for straight quotes in verbatim environments
+\IfFileExists{upquote.sty}{\usepackage{upquote}}{}
+% use microtype if available
+\IfFileExists{microtype.sty}{%
+\usepackage{microtype}
+\UseMicrotypeSet[protrusion]{basicmath} % disable protrusion for tt fonts
+}{}
+$if(geometry)$
+\usepackage[$for(geometry)$$geometry$$sep$,$endfor$]{geometry}
+$endif$
+\usepackage[unicode=true]{hyperref}
+$if(colorlinks)$
+\PassOptionsToPackage{usenames,dvipsnames}{color} % color is loaded by hyperref
+$endif$
+\hypersetup{
+$if(title-meta)$
+            pdftitle={$title-meta$},
+$endif$
+$if(author-meta)$
+            pdfauthor={$author-meta$},
+$endif$
+$if(keywords)$
+            pdfkeywords={$for(keywords)$$keywords$$sep$, $endfor$},
+$endif$
+$if(colorlinks)$
+            colorlinks=true,
+            linkcolor=$if(linkcolor)$$linkcolor$$else$Maroon$endif$,
+            citecolor=$if(citecolor)$$citecolor$$else$Blue$endif$,
+            urlcolor=$if(urlcolor)$$urlcolor$$else$Blue$endif$,
+$else$
+            pdfborder={0 0 0},
+$endif$
+            breaklinks=true}
+\urlstyle{same}  % don't use monospace font for urls
+$if(lang)$
+\ifnum 0\ifxetex 1\fi\ifluatex 1\fi=0 % if pdftex
+  \usepackage[shorthands=off,$for(babel-otherlangs)$$babel-otherlangs$,$endfor$main=$babel-lang$]{babel}
+$if(babel-newcommands)$
+  $babel-newcommands$
+$endif$
+\else
+  \usepackage{polyglossia}
+  \setmainlanguage[$polyglossia-lang.options$]{$polyglossia-lang.name$}
+$for(polyglossia-otherlangs)$
+  \setotherlanguage[$polyglossia-otherlangs.options$]{$polyglossia-otherlangs.name$}
+$endfor$
+\fi
+$endif$
+$if(natbib)$
+\usepackage{natbib}
+\bibliographystyle{$if(biblio-style)$$biblio-style$$else$plainnat$endif$}
+$endif$
+$if(biblatex)$
+\usepackage[$if(biblio-style)$style=$biblio-style$,$endif$$for(biblatexoptions)$$biblatexoptions$$sep$,$endfor$]{biblatex}
+$for(bibliography)$
+\addbibresource{$bibliography$}
+$endfor$
+$endif$
+$if(listings)$
+\usepackage{listings}
+$endif$
+$if(lhs)$
+\lstnewenvironment{code}{\lstset{language=Haskell,basicstyle=\small\ttfamily}}{}
+$endif$
+$if(highlighting-macros)$
+$highlighting-macros$
+$endif$
+$if(verbatim-in-note)$
+\usepackage{fancyvrb}
+\VerbatimFootnotes % allows verbatim text in footnotes
+$endif$
+$if(tables)$
+\usepackage{longtable,booktabs}
+% Fix footnotes in tables (requires footnote package)
+\IfFileExists{footnote.sty}{\usepackage{footnote}\makesavenoteenv{long table}}{}
+$endif$
+$if(graphics)$
+\usepackage{graphicx,grffile}
+\makeatletter
+\def\maxwidth{\ifdim\Gin@nat@width>\linewidth\linewidth\else\Gin@nat@width\fi}
+\def\maxheight{\ifdim\Gin@nat@height>\textheight\textheight\else\Gin@nat@height\fi}
+\makeatother
+% Scale images if necessary, so that they will not overflow the page
+% margins by default, and it is still possible to overwrite the defaults
+% using explicit options in \includegraphics[width, height, ...]{}
+\setkeys{Gin}{width=\maxwidth,height=\maxheight,keepaspectratio}
+$endif$
+$if(links-as-notes)$
+% Make links footnotes instead of hotlinks:
+\renewcommand{\href}[2]{#2\footnote{\url{#1}}}
+$endif$
+$if(strikeout)$
+\usepackage[normalem]{ulem}
+% avoid problems with \sout in headers with hyperref:
+\pdfstringdefDisableCommands{\renewcommand{\sout}{}}
+$endif$
+$if(indent)$
+$else$
+\IfFileExists{parskip.sty}{%
+\usepackage{parskip}
+}{% else
+\setlength{\parindent}{0pt}
+\setlength{\parskip}{6pt plus 2pt minus 1pt}
+}
+$endif$
+\setlength{\emergencystretch}{3em}  % prevent overfull lines
+\providecommand{\tightlist}{%
+  \setlength{\itemsep}{0pt}\setlength{\parskip}{0pt}}
+$if(numbersections)$
+\setcounter{secnumdepth}{$if(secnumdepth)$$secnumdepth$$else$5$endif$}
+$else$
+\setcounter{secnumdepth}{0}
+$endif$
+$if(subparagraph)$
+$else$
+% Redefines (sub)paragraphs to behave more like sections
+\ifx\paragraph\undefined\else
+\let\oldparagraph\paragraph
+\renewcommand{\paragraph}[1]{\oldparagraph{#1}\mbox{}}
+\fi
+\ifx\subparagraph\undefined\else
+\let\oldsubparagraph\subparagraph
+\renewcommand{\subparagraph}[1]{\oldsubparagraph{#1}\mbox{}}
+\fi
+$endif$
+$if(dir)$
+\ifxetex
+  % load bidi as late as possible as it modifies e.g. graphicx
+  $if(latex-dir-rtl)$
+  \usepackage[RTLdocument]{bidi}
+  $else$
+  \usepackage{bidi}
+  $endif$
+\fi
+\ifnum 0\ifxetex 1\fi\ifluatex 1\fi=0 % if pdftex
+  \TeXXeTstate=1
+  \newcommand{\RL}[1]{\beginR #1\endR}
+  \newcommand{\LR}[1]{\beginL #1\endL}
+  \newenvironment{RTL}{\beginR}{\endR}
+  \newenvironment{LTR}{\beginL}{\endL}
+\fi
+$endif$
+
+% set default figure placement to htbp
+\makeatletter
+\def\fps@figure{htbp}
+\makeatother
+
+$if(signature)$
+\usepackage{graphicx,grffile}
+\signature{$if(signature-before)$\vspace*{$signature-before$}$endif$\includegraphics{$signature$}$if(author)$\\$if(signature-after)$\vspace*{$signature-after$}$endif$$for(author)$$author$$sep$\\$endfor$$endif$}
+$else$
+$if(author)$
+\signature{$for(author)$$author$$sep$\\$endfor$}
+$endif$
+$endif$
+
+$if(date)$
+\date{$date$}
+$endif$
+
+$for(header-includes)$
+$header-includes$
+$endfor$
+\address{$for(return-address)$$return-address$$sep$\\$endfor$}
+
+$if(blockquote)$
+\usepackage{mdframed} % color is loaded by mdframed
+\definecolor{greyborder}{RGB}{221,221,221}
+\definecolor{greytext}{RGB}{119,119,119}
+\newmdenv[rightline=false,bottomline=false,topline=false,linewidth=3pt,linecolor=greyborder,skipabove=\parskip]{blockquote}
+\renewenvironment{quote}{\begin{blockquote}\list{}{\rightmargin=0em\leftmargin=0em}%
+\item\relax\color{greytext}\ignorespaces}{\unskip\unskip\endlist\end{blockquote}}
+$endif$
+
+$if(letterhead)$
+\usepackage[dvipsnames]{color}
+\usepackage{wallpaper}
+\ThisULCornerWallPaper{1}{$letterhead$}
+$endif$
+
+\begin{document}
+
+$for(include-before)$
+$include-before$
+
+$endfor$
+$if(toc)$
+{
+$if(colorlinks)$
+\hypersetup{linkcolor=$if(toccolor)$$toccolor$$else$black$endif$}
+$endif$
+\setcounter{tocdepth}{$toc-depth$}
+\tableofcontents
+}
+$endif$
+
+\begin{letter}{$for(address)$$address$$sep$\\$endfor$}
+\opening{$opening$}
+
+$body$
+
+$if(closing)$
+$if(closing-indentation)$
+\longindentation=$closing-indentation$
+$endif$
+\closing{$closing$}
+$endif$
+$if(encl)$
+\encl{$for(encl)$$encl$$sep$\\$endfor$}
+$endif$
+$if(cc)$
+\cc{$for(cc)$$cc$$sep$\\$endfor$}
+$endif$
+$if(ps)$
+\ps{$ps$}
+$endif$
+
+\end{letter}
+
+$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$
+$for(include-after)$
+$include-after$
+
+$endfor$
+\end{document}
diff --git a/inst/rmarkdown/templates/pdf/skeleton/skeleton.Rmd b/inst/rmarkdown/templates/pdf/skeleton/skeleton.Rmd
new file mode 100644
index 0000000..902b3f8
--- /dev/null
+++ b/inst/rmarkdown/templates/pdf/skeleton/skeleton.Rmd
@@ -0,0 +1,31 @@
+---
+author:
+- Aaron Wolen
+- Some Organization
+opening: Dear Dirk,
+closing: Sincerely,
+date: 12 December 2020
+address:
+- Dirk Eddelbuettel
+- 123 Street Rd
+- Chicago, IL
+return-address: 
+- My Home
+- 456 Road St.
+- New York, NY
+cc:
+- Recipient
+encl:
+- Enclosure 
+fontfamily: mathpazo
+fontsize: 11pt
+geometry: margin=1in
+blockquote: true
+output: linl::linl
+---
+
+Lorem ipsum dolor sit amet, consectetur adipiscing elit. Proin mollis dolor vitae tristique eleifend. Quisque non ipsum sit amet velit malesuada consectetur. Praesent vel facilisis leo. Sed facilisis varius orci, ut aliquam lorem malesuada in. Morbi nec purus at nisi fringilla varius non ut dui. Pellentesque bibendum sapien velit. Nulla purus justo, congue eget enim a, elementum sollicitudin eros. Cras porta augue ligula, vel adipiscing odio ullamcorper eu. In tincidunt nisi sit amet tincidunt tincidunt. Maecenas elementum neque eget dolor [egestas fringilla](http://example.com):
+
+> Nullam eget dapibus quam, sit amet sagittis magna. Nam tincidunt, orci ac imperdiet ultricies, neque metus ultrices quam, id gravida augue lacus ac leo. 
+
+Vestibulum id sodales lectus, sed scelerisque quam. Nullam auctor mi et feugiat commodo. Duis interdum imperdiet nulla, vitae bibendum eros placerat non. Cras ornare, risus in faucibus malesuada, libero sem fringilla quam, ut luctus enim sapien eget dolor.
diff --git a/inst/rmarkdown/templates/pdf/template.yaml b/inst/rmarkdown/templates/pdf/template.yaml
new file mode 100644
index 0000000..f03c5b4
--- /dev/null
+++ b/inst/rmarkdown/templates/pdf/template.yaml
@@ -0,0 +1,4 @@
+name: Linl Is Not Letter (PDF)
+description: >
+  A wrapper for the LaTeX Latter class
+create_dir: false
diff --git a/man/linl.Rd b/man/linl.Rd
new file mode 100644
index 0000000..6b3460f
--- /dev/null
+++ b/man/linl.Rd
@@ -0,0 +1,48 @@
+% Generated by roxygen2: do not edit by hand
+% Please edit documentation in R/linl.R
+\name{linl}
+\alias{linl}
+\title{LaTeX Letter format}
+\usage{
+linl(..., keep_tex = TRUE)
+}
+\arguments{
+\item{...}{Additional arguments to \code{rmarkdown::pdf_document}}
+
+\item{keep_tex}{A boolean toggle to select whether intermediate
+LaTeX files are to be kept, defaults to \code{TRUE}}
+}
+\value{
+R Markdown output format to pass to
+\code{\link[rmarkdown:render]{render}}
+}
+\description{
+A format suitable for standard letters, along a with a number of
+helpful extensions
+}
+\examples{
+\dontrun{
+rmarkdown::draft("MyLetter.Rmd", template = "pdf", package = "linl")
+rmarkdown::render("MyLetter.Rmd")
+}
+
+}
+\references{
+JJ Allaire, R Foundation, Hadley Wickham, Journal of Statistical Software, Yihui Xie, Ramnath
+Vaidyanathan, Association for Computing Machinery, Carl Boettiger, Elsevier, Karl Broman,
+Kirill Mueller, Bastiaan Quast, Randall Pruim, Ben Marwick, Charlotte Wickham, Oliver Keyes
+and Miao Yu (2017). rticles: Article Formats for R Markdown. R package version 0.4.1.
+\url{https://CRAN.R-project.org/package=rticles}
+
+JJ Allaire, Joe Cheng, Yihui Xie, Jonathan McPherson, Winston Chang, Jeff Allen, Hadley
+Wickham, Aron Atkins, Rob Hyndman and Ruben Arslan (2017). rmarkdown: Dynamic Documents for R.
+R package version 1.6. \url{https://CRAN.R-project.org/package=rmarkdown}
+
+Yihui Xie (2017). knitr: A General-Purpose Package for Dynamic Report Generation in R. R
+package version 1.17.
+
+Aaron Wolen (2017). pandoc-letter. GitHub Repository. \url{https://github.com/aaronwolen/pandoc-letter}
+}
+\seealso{
+\code{\link[pinp]{pinp}}
+}
diff --git a/vignettes/examples/letterhead.pdf b/vignettes/examples/letterhead.pdf
new file mode 100644
index 0000000000000000000000000000000000000000..429676ec6ca12f716597f7bc3a37bc0ca846a35d
GIT binary patch
literal 8083
zcmb_>by(Bi+dqwff;37E5JVAJFa}7EPH72+0i$6sMyDcO64EeK5J^QsLb?=136+rU
zP(ZqQHskU8`S|><??1ndz2E1&PTX<si|c-!oA-u-k|0P3Ldn}cw=uU;u$kN2-bpC}
z00K~!4wRCT0AUTJi!H_u0L4MN0AVG2CkzsedpjX8NCl)7${GofmZo&appgh?N^e5s
zeGtuE;Q3Imzz$aA4U=Zd;`R<ZZhLz28QJF~^pyS6r!NH+$o=4%^M1RlV-a*b5rS&d
z4A)cS)Xn;MuAWtNmJLWhpmC5Dt-T&2erY|zF*mTGZeO+6$0wZ0aQ^M|<4-=0>iHI`
zQ6>oCyVfgBsp|X+@--lZ5LUyZ<HU>1?00Q$o{JTk7vC}nPs-veG&PozALWV@i^x@o
z+RVzIjD`p|zITk0#Oeiih(6nhk+(^mdNS`RGe=&gEMG{8bg}+r3a*9s0N!l;8zc_K
z58|8P|8S1Jk1G-&d;?+o<B3MPU;vPxj?zWCqdd@7NOyqfPXLZ`!QjT-0eI))JgJGa
zwnxaLyaA>_8~_4>MF22Sv0IeFa5T#G7Y>Dr2|+<3;6K9vVR<Jc()#ap0AYQ!z4PBV
zrLY_t^EV6-)<t1(M~D-RJHB6*;Whnz>^IOTD?KCzV2U$OK?%1z(i;P~1rUa#oKR>z
zSA-Q3fR7HiI|u;#VUV;mE-G*~{($xMK>#s4Oo@a42oV1d0l(r3gts2&4lSJHgyrzT
z<$_mBSOMv2Z-vxVmjCZDm!0CJ&oIc`HSx|#xbjvCH*%@rC25{egUSOw%D1aT>c*du
z%+Fy8q})*vXACd#TQ=MA(+NDfdFBk$S3(MIwX;gJj1S&*vTg5Pzr25}HO}cJy&15Z
z<Fzn;`2GR`KOq+pg1Ur2w)zHl+}5s5XUApW_XYwog<xV)0@s?_N4@+_cEM$`=Asa0
zkHqihR78{8g25&PWu_$eAn8F%r)%&80XlVp;MP8Z>l`wv(P*x2<9)gW4Xi?XPU00S
z79J~52B5nLtaaEvA9UbvseNJdMX2OQ<&=tu)Se_a=5E%_Jpbf`^U2X0BuD<qsN51P
zZx2)M5gF1~6q`gv5XL>g>+d4b{h42{y)VHjd4WhaH!q;$ih21x^Wb?3g6qna3fENB
zQ-QIyd>X8_woH&<EVd(6<yx!ws772`m-T{mv{)-If&YPxF~g0-Pbra1!+o8@eSNK;
z=>$&~w&OFg4JQ|@8;)ncgQq{_$i?IckE9L>n`j9Vlw7G4HEp!Ja-Go5lqPt2OgQ62
znqZcS(C*vevLDL}AJtS91tCMj{r&wEBI!Y0!`=@oK@$EuM}B+DlIp`gSjVodsRDGK
zG2N4rr=wXVY=vp*0@JSh8qud5(?RTe1}5fn2#z<}bJ6?qTTfXq-6X9dm1FWbvfQs}
z!KAHCE9*^X53iD62+VL~u=C&~lzKzQztu;$;Yicm`<g&?G-Op4d&ndoL--<-xmaq)
zepN?l_q6g9F$vyce9xE%LV~Y@Gu}Li+O&=tr$}!hqPtIy$t9}{<^Ym0H8Y738ckC8
z%bh<%+y~&eMr3xM`o$fV*^oJlbNocS7F0vjMJ=~)kYALg7b6>KR&}K|BQa`$y3&sl
z!z~yjiIXOwX?Fl;Xmq$P=8@UM$?jjUrYZ+`y=JDo!~M{k|AJb`z55I%)TJS6x#*`C
zM`)n36Y$Hq?!CyToOQ(K;4{5zz1LapTmiCwzIP5GkVfj)(&8%e>bzD6bDR2<yf?&*
zbg)%<(r}N>pRtjGrsc!r6%v5;y*rBlrZZFs9)t=}VpK%J0~L^N<VS8z74rUAGv%=R
z6tjY4;SUjMEL1T9d;}2AwvKC^CGE+UMWAqCX`0YGk9R;Dx=mX34hM^#=R!lWPHdv*
zGUEkX4J}v71&64HGKX}&I<irBHD8#@awV+sHY0PnP{#0*bui|7^h#Ik<db#pR~N_6
zu7%OGxv$gt(*|BXIdgJ0kU%CX2o9jHq^Ks5ktdQ<xvBp25*uF@-`Vq>XCMlsj|lrh
zS(IjJQ_sJR@Mx#D<aA3GgX><pkT9y!mv^@RqAp`$B<2nVyOpTHx00CshSr+U2U;8D
zpX?tgsS&8I^C(SsC|MyY`9(VVJ~{;*zLBVwe^FPekV2or15$OzH|OB~fl?fw?G<MJ
zt|U`lBc8#lFu<-^4nGR8#@nP4Sm>XB<hC!pPeJ<V?n5HeJCC31K2(~z*P7d!%&pm{
z1kwPRmg|3iK8@_Stme%N=QZce(S6uYn7^sUBXaMFveiIMrAMX22<ZqvyE5z%c|T;4
zcWZ62VM`Usi}aggnIoFJIH%VQKYI`H`i!+TsGFsW<t59SzKFpq{k^N1`WgCU`cDiN
zp86JT7(^Rn8lZ|A^{k5ai;zXm29A1uxp6u$gZLXCj3yoj$^}?b2gI$gt!7P&cg>G}
z3WjPxxuGfcY`u$pY5gDjw+0#PS3gQV6MxvzyYaERx2RX56k4V^;5o=-XJm)%3+&dn
z@dZ_+8N3sk&x;Gw3XapaZPI%7KBg>T)qkw2uBVP>OU3tEgMI^LgI0rTfb;Q<<GF*_
z1Fv%tWY<D4A?##hWCLMJVdY`0XTO}qvJ_q<y(kEE5UE3HKzD$*oy;8l+emC%!EZ!{
zozXoEq8>m^SSjcmB&3I}hs377=b)#2{{6iCrpcxpRa9uIVvgeDj_15>;C6H=GIP#d
zAfT9}xYTgWkh7G%q@rY{WNny#m}I!5YU%m@*yoQaj;2<AZE+3@wlBNO##Tcc(xoN>
z<By%mGvH6#$ilV4Y2vivEW7x++%5+cSQp&V3b`gBkY&(aHyh)z<9U0|zkk0p`f+so
zT-sYy8B<w$S@<pNJ7~sRtSQW^U2`yYrh3Bpb@o!u*TxS4ui;%GGde5ZU+aBHS}<M{
zpGQtVnDS^}seM`Xa;Uz;FXLP5?H1{kkiES_hQqCctNZVFOLqbm3szF+2Nz*WYm-gy
zPMruu0b&-8%@(;f0N8UbSMcjAc8WKQfV^T?Yb5q`BJ3l?@^~1i&ryys`3B{*NKU<~
z2A*ePsTTYySEI8xz0S$wN;^dhrH$ut=1x`iRPK9}_=sA$A#Nv5D7q0g;oXP{w2krC
zu+)IR!<1+{`Fy>RWiT35Q~Z7T``x`A5`TFO`GD4sL=&W6m}B@PE-~?ro7h!8x0sq!
zT#kOhl&zMiJ$;E?yOXbrk5en~1I5fo^b=hoJ<og%^zbPAsI8>-ZBkU$TBq<re12Vi
zN`bVhyZV<D(VW$U+v(C=7F0!~!eAosj*W(G7?R^%R!>xq!+SpK%eL6_S1BN&x5Q1v
zNyU%3Avy_mcI9uUzeQi}Xqi4R<M%?i)ZdFc(b!gr&0ooH^I7$Q`k*$fHsYE2asRq}
zQ__TnE3KUhC;CyTh!nR}51~QhMw|V0%4dv+M)CrBhMr~prUo?*n5xrdxTA_Ac<`w5
zv#<01h|!AWpa+8kQ<)H(@mf=3xk{OenMh5GN85O8TI}7}hRm;`-$u8}(~SJ{+w1aP
z%m!R}xz!C5ozM?})Qfw#qtdO0a|CMyTLoWM`#MSKm)&fv^tU!$to}@Cqv+OA{7v<X
zu+fOo>X_UJ*BD5jQTJ1$UeH2H_FC~kG3vATpvYSPP?i1Qmdp6+9jP3@j2(wn!Qn#}
zti{B)<C8;E$8(MXG?Ub`?A~U~dV|M;D__EVw+|8zXvjm!!>JWHmK|Ij?8HjkYD#Eb
zl11Y<RVC5iu4C6mGOuOqz#tjwad#j0Kh|#2J~{bZK53QRW!#k+2;4&$QI+P`Fgo1o
zml#eN7yZaFF&@Ods9+oJsQflQMTSGN(EY`H@<!o{fxLmx0^1MQq#z!K7|&_5k=lg!
zdGGxeX5LRMMlCKkocEvVS8R%2sBftIV1};8Y`l0oM{jh~XrxTyw(~c)Mf?3XQw1rv
zyT(6D7c}lTz8{o0SlGdGth0!DjV&B>u-<`{jc0jPoPItseMwGF9`3T~B2$~>vCuL0
zsvfdyIMFpO9GJVFyYaBIZ3L?s=)!?!lYoAOjBfHT_chS2zOFDw2l>dD?4=#lpf&tT
zrXs&3CCvoR4CV-VOB`ryIoUi~H0m(-l7a=Ew4rjEwlz96;~LL5r5!hH<&V4#dG^)Z
zLn~BU%0K(q*QRbSb|e#yGDg);bTqPNz6pvCGT&~Qg?DvL#_!rz*xH^F5T|V({hjLn
z$V7i6_@W@_@01vy+u|`?8mtP3%Ol*8)&P7Ks|&dGdkQ|`|D84e;REjf&hSM+U;s=U
z{3C_-z@^C`fUvr~wL31s#uEzMe*cjtgFt`n2}fWMPAJ=-WW)Uz%lMO7<CE=wD)A#1
z7uNHz#QfkW`e+a2PwntV{2bI&gsT~-38)~QJdqfCD}<niy{#SQXBw}7bhkp=yJApi
zN}S?9QglTZ9Nn{b!Rerhu+l|2BV7I<O7>`X4BQTZ20*|#&WQNc0fAruVIzBMjNK1I
zVPcf{bpQX$_a8e!p?L0s|BC+b-JkdWE$jDu{A^sC5)8vT5RZbvcx!>b-gpH6`?)Iw
z0s%mQxG~&pJo=9#`<oWxo&3j*Ki#T@aK@3F|EJ@f5Vp9p#d#3FRvt&&C`|=Lpb&r{
z1PTR!AR@R27$}O1Ayr&7*jvfD*gD}UoUoj`6`p&-V7NA3B)%gEhTwW|gsTb?f2@=+
zoaVxM7^Jfye#On7C_og9<6W8v?;nQ*0Eys4{1A>K`bZq_{K;nj#MuwvccA^IaK9Ms
z&o0iPVo<yV|K+CO+f8*R(=Nt_%{@j%sS^%Wojkk550`ior?H9rI+fDNCGkk(llDCJ
zk2;scJuNRQE$8h6p6cWY<~~sjCa~}0%j8xh<{{P3y}~aL93sMBcV&`^Fhg-tk(lAz
zBV&?PzNdvbKK_puwe^JWdg@WeL)>k>7slP!Mj_g%*g%`?cbHHSkw#y)Il3#HZKNWc
zWzv4)y=+uQy;?a9TSJN-M_dWjJ42xhA4I!4uO{$ko0=Ot#w}s($Un&SvQ<cq94`pn
z4lENFCF$j;TmM)jfzq%V^>UjN_Xs*5nQ2ZEU>@w7o;hG_JP?xF-hSJC-)yvTSY7*B
z@ydlATb<5~iXId#_ZHh0lSeNkPftmKE`i|7l(62Vcdq4=G-DE0SB^s@GnzIgT;5=h
z!(Il7og8vPl~_^Be3ea|&xvK60&|UczHXgg3Jlw)!O$1EcwCHqto1~!Udi_>Dz0K>
z_7O58muNeIW?*N}13l1&*`ij3vFi>FJ%D1eoiJq4d?SH21<dxb)Ouz4ujRC_I__Me
z%WhDg&Xc<cNSDkjY78q&ar!P{Ogtc*y;kNLvZCNtM`lYxSF@dAvmhZsGr-1Jh@BL<
zfM{SksZ_TR2w^X<3wu$jNL12f)d#&Nr%cwU<8H(ee=YV#<W;t+Y{?6xQjx7t@EKTe
z_Pr+Bn>nG!w&hPq0=}*6UA$Y}E}tzCryulYh{nOAdh?rvf$z)npq}(+=RQXA65Uza
ze4x2=hD@I5?#=U3n%uyOLW&P;rQKD{N)}cw&OAVRv6nBZ3(pA%@_mLm6gKm*7w2^C
zes^$ne>LyyG3Z!DyV!@8+M`H8eaxM5GaxomOs<PntZSFI(4!aEy;bINyU-ifB>+VM
zS<=S+PgOiNkE38WixCeRkyozGBkV_<f_n~F=3_MlyNWVr#x;waom{iKiqNi`-JM}x
z#DPy|BpQNJgZswrx)~5$$|Y9O7#x1Ub0bWN+P7Agx?66@xY%MXuD!K<S>)O|w7RA_
zwU6yv+7f8nkrwGj*|Rg~?{a{blILeXr{sIdx`gx?Qr8{_ovEEUy?^?$;uSkO`JyLP
zJXKagE)wy8dM5HQR^fV#CxJWNh;dzHhCjVyZx?;b5uIrs>5=rXN!x|OH##;z;)P@a
zsXR5{UX)C|Q@+lYLz6<iR{B8FotQ<B`>GebroU+1BH`wxGHy}Kx_*X9M!{&2-ZLVA
z%U>Cup`H<6CH<{t$2mLC5ALNW^DO9#g?xHf_!!+dvCrbefwSxaV!DMA7uIi<J{^Ir
zua|pJDLk$XrS)an@>a!`Z5XdHeZ-_V7RgQ$-N8f=L{|+F@v=+N`!2-@+EKm8{epmq
zJqlaAkv!&*Hf$Q}Rd%wvEMWBP;Mr})@%me|qMjEy%gGu&J;^*hz4cRQ5ik~I<xppq
zcP;&$UZocPdP=th1@tQ{I+zwzzGha;Ims=cLj%-n+z!9f9+}BX-v?4>b3gTL(2`o$
zZygwzuO(?amuDcw{NVO(EcuWZE0CgDpXw^|#<XGS8Jpv~dUP%0qRQ3R7&d6Ps3C3d
zmhM8_y`hIQu>Nq$hN=geQ%V-zWzR6)&EtE)Qnu7gNe|LHu?X1Xz4sHLTvK|z$D^X#
zL{u`>!%xooJ`vTg6Tdp<{B*V!@WHBrl#NvE)48|S9WS_=_zH%SJ~D40xw?9iH&x}R
zBkz7exvKe!Co@noS8en<1^Mz##l#4*n_i6m%Ia4m;#oI~UF?Yq-ypX#%$5c<dRrqD
z#=Y(L64Dp3{dyo}uhU$a6dJX-oOTSCB!uNmEQi)sD)-L#>~rlnA7_8=rXB0G#Wy;+
zDWm&lt`u}&->C6sMM99<%+&BrIVZket-R{{m6AMTu3S%cmi61sKvk?*pqH2id+93`
zH#xN)t(+!fq1V+EJ3w9fx^|=Fj9ibaZ`eBHq}0HWgbNDu$w$pp<uNJ4H`2NC*hE6i
z$R5e|@zsW9aVNq1@}4xCHm7k~%0#loX$ed0Y+v6sqP*i_+HDDndH?mTveXEu=VV&`
znnd=>w!+zQq4KwuYaf+31jDHF0@lFApYr<VsK#E@4{!)6Vd-MX;5RhlJblUK-$Vw6
z3z~7*9VvQ7Txoeqdrd2zMSX||o{(Da^PYy-RJFFYV=3H2trC$*Pz_#Bx>H&h`jmvC
zYv@y=H{g3EFhxvS*ED6@P0pNkQAo(O3h{M;C`hlD{8P<7&;7uyYnnH`Hnm8Zl#PU5
zKYBvJuC0}t889jZ?86pay3~@%5#P>7zpAUcxcp&OioB?U!~FZ~Vz0080B?%Y-1=Um
zh7H%+xmckJVV45!T?N1Pp-~ezS7!vE&D<&YErBc7Y*r-qR*!_DPvcZ15xvaOHgS>`
zDIvWQNg;7*$g{h{w8$_X-YVCG+9WjVSq`Cf*Jm$%1n)`QW}Qtr<=86m+Kbogf;hVJ
zdxfu&d5#U6udc90@7mq^{$_8{&8^7&bkhHcze77STQRlFcOt94*ZNNevDs&Bt*GEF
zXpleP6Md$sAk!ez^s|Q60Go)5AihzBSnmMVk1ghWHL9N83-^SHOuULeFV*fJREv4J
z$|+~cmbUs8^t?A3`U0@~KysU*T!!eG@`sWwu`)KrM!(%yOsCFk#*GlkQLQ<R?H5^k
z)o(=YL8f%|J&B*jtUi~NJ{VFSemrL^$I?IS{~|#0i^}u($%$)QK~ZMA{hJ;eT!!2n
zoI7?KBTRhWq_od7&#=}3M@rdtfl<pRIqrT8!~w68F>a{(4C9_#F9gbGU+LM5lFGQZ
zVyeV)9foYw51Gjalmn>Yg_0}kVSZ=XO{SD)DpVwf)>zMp1h&Mze>dcR$gAD|WsmhP
zapNPSsd%#FtwqrV-jnbMdsAt*G8f-VmEi9=HH$U*b=9w{4j+XqjW8h{D8(1hOU-$?
zO~;|@u_l^tSY1H@=H)ycwQ1(&91+o(*It<s5zl=5)~P%a9j_Qm16N?tVjG{P<vgdv
zbd$HbL%G4`YiL_@0Jw6_q+VOiU!hUnsWaT%j;&|!b#>O}388N-rioz5c8!@c?dlB@
zs6zb3>0JIM)$JD6K<px10kbaG)isnhfd$Hcn3zw9%(Oj#QKvm0ddxw4+h9*qja*_F
z>0rjs=Fm5a<eBfz$%@!hFHo~8P-}QdT*aI>WGw+@Od5@RBZg9BD#|KlFj|;#V`$qL
zaY`OeR91pdmFM5|^|^FjX!Bl(x%zb<uChJGg29X|#9iSm;XPFkZr#LbdKn|SJeMkG
zFzIbYMC0guu?hLkqXKYijx3T99$jl-sIw;IwGj%Ri+oB+7-#%GU2loG_w_@SEx#<G
z#DUX0LPNJOeZ7=HlHZo<Lxfla0X`MY@Vv)gB$X4oj~F(V^X)&W^TZdF3+C+RIr)WM
zymS5}phLJwb4F*0`_bf)kV;R5NJ3_e3CXdVIHX0MN8QaS;yT@-pc4yV^i@(s7_BxP
z)6L)pQrhoVXs3L?Bs3LVdO1U>d_T<-I@q7iB}2*F^q8;8;X+DMP19n6rAc7;oIhKD
zd{!~Zz+p-He)v4ZR*OSsLfpoTpGm!24EQQdgX7)7J*?I_;|4C}OJ6JZ!rke+n2Pc>
zo@i6oe`}d?s$p>pZf|?Vr*a*u2lr+l4zy<#7CHKK&#E}wHp|D^u17G&fO15gwTf(w
zLPU}>WB%dVT`RH<MV_uR@r?0gx~b^g(IYg|mC3RM_@^0-$Ni|s?oEyWD9p&jm{vn8
zeAtSKWT5$sALwwoc(^l@8awuMP8ArP<{xz$=d+kT|AmB$y2J-;0efb3G$yYgU`aM!
zwWrh*D%B=9>iV`}DTFw8BX;=}n)^}*Vdt9avH@WwPi^vIIW|?zCP;*{`$Ic>{zl8X
z9X2|3)3|S~e0#p&a5%E_x*oaTW`$dp$6Upx&}#ec;bf4HEF|>QnR+@XfV}0oyV$vK
zJBl@1<t3Kv=FA1vB1^`Zqk^Zs#J5edax!E<oY-4U>t7G%Hj4#_!{5tzu5L6D%p*UE
z{U6l&cR>*Xgoys;&7j}4HGU@~23Pm7Ln5rN{O{oJS`<HyYXY?O05@?pFd+~~2n^8i
zK%g<c09;k-M@h{a^Jmd-w$87P^l?F9kbg#g^J9Jm2`~@@1%W~MC$6++0t8;h{r#DV
zBS*jajlMkwN3VY9iK|fIDq_|iR=DCP2(KFsfa7YOIDQPkaoj(Bdz6a;zJLY7OT<mm
zL|Nnel)w6an3OjfX@ldiAaP3I|9$|XP$&cnumSwSU?L*8n*jU=;PM*-LV!4V|HL2=
zahx;%i2;FlCi^c8EQV9-Ul<hp*IEcf6vu)8IS&E_|Gif9Zy7j}jJqKD*IE%gzy22{
zj^~p9#6)oX^WPW@j3c%Gng;`m|K%4L1pN0r2<$HzFo^hn=!Zcga6}jVqtdNs?~6M(
zaeQeMg}a}@-@)JxP}Ri-g}bcz*;c?^*GP(6TOyz~K!`ZlT1?#98et8Bh*?@%gRQKr
jU=RobB2D?<r~JG-aL3?6`9~nYpdzA_yu6CqN|gTt1Ur`!

literal 0
HcmV?d00001

diff --git a/vignettes/examples/signature.pdf b/vignettes/examples/signature.pdf
new file mode 100644
index 0000000000000000000000000000000000000000..11a17c3359ddae84a86b9911618d1656e026725e
GIT binary patch
literal 7574
zcmbt(2{@GR*S{^xkW`jPdB_^ZY=%kpeJ7GN4Kv1AhQ`>FCG@kD>`{`nRF)!%kR`H2
zlC45^i4?LX|7VnMee1pczxTS{d4}t`&vVXmpZlD1-*e9Ah?r<-NyDK?h{(&=&-x)K
z00wwCxIm5{hsYS<Nd$^BfRqD%ejqYhL^lea49IA?VJUbGyrTyW4^dKrcu~lBtUJW-
zjpR7O97dz2zRM1Y1j=EjbUG$pt+dOUd$vqL#_4DX){OBGJPG%cAH1W^h5T(!bAL}f
zAY+0h;2|>V9wZ8$MDYTsN}YhnoWOf|c#|FRUI5|;!4QulV%0qS02>%cfWwfWu67Vm
znhc5ovfE6cc0Z?qgX5j0{g}qm*ue$wNP)<hc{@<HC)V;HyMwC)|8H}^!Izn9T0+5P
z<BhQHct9K~<3%KpuoQ1H9_op6lK9C$RoKYe-2t@Cj*KqJ$wPzaNCD74lvVpjQ8XL@
z$YBtmroUE1wYLe`!_f>+0c=16XlMa4=6F8}0CK5&xOtGxJh6^=fXb%s1qbAQt_@Tb
zT<P)SAhS6fkf&0?1%uxm=fP2O|J7@>c9-w7hpBLA1lEiuYYTcZ`HJQ79aKm#6pxJ%
zv}9pe-D*_G6|!l^As2lJd`{6Yql4$%Ed#8z7T(_ZV6lXD^=&^_o_!bL_$6}2)`^?o
zKIu+Y(FjmgX%FQpyuABVU}flClkbnJo~uCjb+(H6XG7;X=S=ilTlik1UNIhg<?`n1
z+c*iC@jAPDn-_ahH=)&k#|YJk|2U6Gal-?cA7)kcrZ{_mR;NY)7$cx3sV)WJRBwZ0
z(55(VN2*(X#*8``sT8UJHR?cy?J?1VqyYvr0RI_jh90<ojrH;Vz8++p7XbeeR5Gfn
zCI&~4s=w$zoct@;s1Bm)Ya^qpuC9jl!s7t=w$to(!jbB%e^&G}_(;FUqB+?cPmMx|
z3{`&H(K34GC$x-oB=ztl64uNcd_*N{;JqBlM9=M2ZHE9vMw0|?O(KZ^$QWWBPk6Xv
zNjns3G?2Y0>dsg)fJA_Cg8eyw!%+~KQ$!ra*$a$7IGSqE|J#LvQ?2s9y-;YXZU4Lw
z7^)+w7ee;m&*0m>K%h|o97A0-$N`7hQDgt-ey0Wq)xhE>Nfc_t;3RgQYzNEsBULQf
zg9M!NaKn>+J>5Ad#D9^f!Luy@niDWK11!OSgTfI|IAH3HB~t<baKmmNSALXVLObW0
zIQ4Y!`bFP4W5qR&Az*OuGywmQ;PU0IVK6c9`-_umk?m=Jk#;tM4InP@Pb_VR7M1b0
zV;lZ+gBSrwh>R-r*anX+@NCt<`w$)RC$!c6`?-*j;%ja;z<sf^TCV!#J|RG4i7$W!
zc%`7j#b6qx8)8Bi87}Ihu}h0{uY?88{3)&WMIlE`PSy)y4t*>O941Y5rW%?PgR!nG
z^M$gDL+P8%R>K2RkNO4(^Fe);G$!A|80smOv>~W0OU_Rp>umS!Z);qkJHSE9Zb|!e
z#L0<4dsTz(^|xxpw6xngO{L49pdq-bw^FqxqF%jQ!SO<J>cWgP5X~O+@$;fQ6Ld*t
zrO$W~TMVsB$r6Z2ID$KiCHtPxSYxr<@~uh9s+Oy%qT^Y7Rvo-gP&Z<$Ooq}$Msi{q
zvTU!4yeH(GW5QRP>!#C8tcZ7auU<ExfpMnUw@-;?xkVu~Ie9-tEzr?0CpBW8klAC_
zFwQq<{PGFo(F{?#4*7fgt`aAvpF6F8DK%SjfJ-Jd7>@kM&!BUujO{XvC#2XTMUz&<
z%010Fey)&zZqBNA(s`|RVEFKPvrWb40UIa3h|YH2P>sD|HS9KfPo|oiW?9(!+M&{#
z<dZaI?u;rEBlnEw0h)zfG-X5A7Y|3eola;RWfNnKnVog>qRn)LN>0mdWQKXP)<$Ah
z(%L?4SSaN4D2E==<wD{$C-QIQ>ua>Pv$3ak;x<<}w#J@fh%Z_iq^@T^<@pjZebRI~
zi6uPBxhmp#sO1$X4iX;RGZK6NEyl!qKEsvM+1s8bC<0?rq098#Ly<=P2)!^#Ie;$c
zqYVcf^1SAWb76e3R~#bX`_#Gst8FxC#6VTZY;u_`4o4Qrmg3DB4tJ}g+joVDaub3I
zg~I5h&g|w7L3+{;0W{$uIvn&V^iUl-q6)(URi%C!h$_6F*5`tYC(Y~7fR_wLVQ5cA
zTZU6lcYCt3g=nilBJ1>Fv_qjp=CIEkT-mC3u5jn>NmJ|PIB3o6udZq$&q@DGJ?aWa
zg38)U(c1@(UbvH`Zlbt!gu++JY<FS(Ceup*#kffu6u$Q=T{m`jKTUbaK#2lBvvz&k
zdksIX>r6aP-;U^2a4WGts^=Lw_?bp3!oEI{S>-u1eV3Lc^T96~YF8|UY4-}c#tY@r
z6=<ekVb4AI_>xZi*>QTti&@yK2e_Mf$1YmMjyPCgdmZ#(Jy#vCS{U$5qMbO9p=)7z
z4n6ntEyeCB`>>$*Ub`gSXmKX)j7>@EefoavtO7rK^HbhYe$Vq22W$}}*&>EVd-`Il
zLOwR^9ufWG_vGjh=X}_nI<L<T=LBmY!TiC8hvNjAYQ?UwSTneW?Ga1?gx!SAIrx~T
zm^Z`s)}u^AZyQsDB02mUZ5<@;U+!0ZqRTI8l*p+YDa><1SR$<~)Lhp^$WByIv|2E+
z<rq$ze85WOv~iJeCSWhJCqdaHNnDiESdU**ZNLbl_gKYW#a}(|#O~Xq*Oqs#R%Tcm
zS8D|61<7b9B2yPr$65*#@5Z|(e@qP&F;41B^-Z;hW{TMh2J3y#|5ia~TBlNH7MfFH
zk)<_KR<9VLtC^mi?C>9lbcZO13!}2nOhuj~geE-NXI!B2q2!fFo*<uEcb@;NiZa8p
zV{h<pV28BjayPmYKRjC!n66%8!HeK+Cd4QBC-^2xTTd|7!_KTCPw?i&CdO99#x0^I
zA9s#*zC{-kPj5YuNM1WiI(jZyDA_5QHaYH&!AXxE&Yp}r?stq|!(2pNur32G8$Hmw
zmpX5C`rhcwut#l;f4ewSQW+IcvF`G<VMcK#kuROEhL4x;Bws43NtQRAl-`m)kv@fL
zE_1eKeaK)vVLkQmG%PvoQ@gp7NNEfvtFUP9mUNd=?%-X;LdV;smV_Lm(vJOh2~Zn3
z)kn6E%zV|1^<^w&?2Aq3vy@CT3o~<TwQFsHTc5rJ-kgb1y;gTSD>|zddjp#@;&|jv
z{N1jjIo3G}P4bTAXQRI;joFBnL}lnE=w50uH0ysoWPYZyv#gWNb<$ZBbyv2kIlJVY
zmDN41-kX?)<Im6K_+ML-WL1o@jLG00<hGZZlQNV3C?#MeVYSQBy=<mrz2Qw`x~rXI
zP;;cqm}6;2{@~=p!UE}GpW3+~g><`;LGCJ}s?KHhWuXnx4LFnHMZb&H>?{2gAMvX2
zpq{-Sr$;I}zQm3(i3N(?@7BFFoMF`=(XqQDhn0=zGtX=31LUr=BNhDQcqk4UYwzco
z_4?%7<T2}y>+Obpm!^Cg-5Uq{6$dseHYE4x?}^urX->M8IK|h=dip=9#i!y=6+cQ?
zahP|Rzom3cDN5;*(*7Esn!7<VtJqDtO`r9_#lFu|>wO!>4Dt;3Sf(Ml3|b5pOiHW>
zmVLXt85-(n>#D*8WM0_|+rH+eQ~Rdw6LFkHmd%c9-Rl5U3UyC(*1zJU-+4b@25ARP
z4fVz<ow(<(o@>Wk;@0Q()oRgxrrD!ys2Ql4s;Qr9DP>hUt`%z?3*;+u3moJM6!sw(
zth^f3zc@BK3K{zZMcSs6&b}c(oG57PEV^P}XLa`I;e!H)hB>yP_SY9o7!)npKlYtq
z=u51+xREf`Bsq2Ii`^>zTRcN*_=E5+jnqcFC`a8QT`t`*I%Cy`@4X+`FNBU4Bwb0$
zkw6x76}%vZm#vm{tBGKvOC;@(iel9=4X7NLdSxrI=hMmk*(zP}2I5{;PE}Vge>eE5
z6Dxd8<boAzsmp^Qf;K+0)wF%@<kEQhIH~PW%VNvMd08h}UvEN<&-ci0b+Vsa*$X3j
zi)`OMHuANrs~q`S^D)jHaMv05+@{rb34d^y6g~9X^rmS^%^By?`N<}=$7-e{)zTd{
z>~7E8xZLIjok|N`-lhtj?)vJ`HX1!@Eb=bl<FHlGskOoO<?y-cyyd(N-}gSuzV8M<
zR4!VkIar+@cv<w`u5hA#A$#Fb)v4JU3#`rAGkb_}xVSRJ?FZF*#V*=Cw`Ou@Liys-
zC#z=yAI)XFX@1*RJM13ZO?!#{8I#gsPW~ss&sR)b3sv2pVc(71Yv}x#JyTgr2(}N_
znA7<Z->Ds;o!49+=iQ_5x=-%5ToSteQbN=Hv9rw{oA1A>2kyW7!33G}c$Gn35c6fU
zc~xNk2HWug|LCAQAH+5@m&;#TM_Xt0zUz%D&qWgh4FZQhgmh;d>Nq5=d~NI8QtWbC
zdTA>`zcapr>-sfJrtkR$wWf$KF;P4hkDa0@RhEsv$|x!+8fptoEk6C_F}dJv^~Sf8
zsdouQ7(0cajG*ed$jwW=hpTR+*w3CPet0<VUj4zdbTehF@N&(rps97c4Vj_k%AkqM
zTNwxGV;I*zL2ClHPQO$95Hz&e#Z<88v~qiZ{HF7!<Lp?r7{vJKjXTPPn?0+2P6gFV
zvp4(Bbe8^y5EogYF0+-qR&3m`tFxd}QmagBM!QhEGj=U@FyQ{uv(Ig@soi4{wG!XU
zSCYH#W}f%ms3thHG=6sN`k1DyH*~uOv);SxK82ee@Af6m=iiDRx?7{X9J-mc;keWs
z|6$g6)i^oxlCtkPmTwDwqV7(U!z<y78`KQ@-^D%rf39<W)hs`1nC<HNe<*L<umrE|
zI)z&3{3xLTX#@-gNF(Jj02(F-$fKz>zb*yqMs!pq5x~k22Ijk7j#LOhP8PhUPDLF^
zgB1i=?_oW4@I-<$_z;c;>qQFQ-GVA%`ICx7fn|`Y4`I6!0+7_A$PnxIV<e9RQ)#Lq
zR6GCyAgD#hiQg)Y?Ub9Eh9khFey7;j=K3QyNBpc#e;_Py03jy_>hfQ}720GAeYb;s
zTtS)si&JbZBbobTIfJ8hOqE^42N2Rd2{ZjFjxpu>j6V3D6gQsooTkgyvIP$8asdpw
z?RHc4KAo<gPS7+{_l^PYVo2+%7f8`iItFI`n=y1lWl;l2;W^E8!^2bUK`R~Cngctl
zSFog-?@jFR7Wev=)(F?Pfw{{4w>akQE4;f8O)p6aza6ZixZlnc3m>YWe66aY&)B-e
zv6h<ZTQ0*+8LgeSi^SgS=EHqoczDf&of7#KH#+0W6WO^opVeICUW@q_ys&5b)7Lpy
zg$rNT1Fx)A_mST5&kSF*eHR!+sJKynQ$Nmvor8Si%2a}hrT6-w#;HB_7cQ&34-Ecf
z6B1`ptUT}_H8VkYtN+m!+<x7|zN5ys<k9MEpj(W6NYTi%x~B@W_KIm7HE(QYgRZ&n
zUOB83`ErFtB9U3}O7hr-hC<gmSDv!_eD_e?O3RyRkNXFQ*PC7|WpVY{)jsIWo60JI
zuq9fx`#l?+UZ`(!lI-(QAWcog9P(|beiC$Fl52h69-m`##7Fw+g_0GSF8C_Rxuuv7
zMpZ#H8#>>W{C2e|xX*qr9AUo_)V)No6h7KK2$i|voZ;r}QJhyL={iS2e=PD9$Z+-+
zD9kIJLtC`S9FJ&Lu1Gkre(x#4e_v-$9rT5TugIXtoKf>|=|C&K>XAYQh3PEY*Pw-I
zFGf8j4@+LYrwq$9`#)|hEwi{W#<%4MsY9=|)psuQeYd&G?@``6LM&I*e0~V`{_tl3
zp~QpL#<%s@7AjUe7EUE(2Mg}2?%TLB8DLxz#*QR7;CU+b)3;Lfuhx#6)HVi8u=cvB
zzg-MCc$;5MD7*OP^66NCF6K>^O|h5~_S7|re%@?B^PF7>UGA2si#Wz-&)e=2`w2R1
z;&g{gXs^@ygxWkk^d9Od;74<uk#5Rj*BVV?9E}gjsh9Y&g2zni4$k>P?^)GEu9&f-
zC;bbi>+(^4gOXfcnlaU_+GSn$L%b^P8JmmJcjZ2l$ct^$l0Op{%e60FLnS{96KWuI
z<zS2%6wb{jaMn59<$7h$+Qa)vvlUMAyiRJ&hHyIUTRm-aU6x3xy;h4_dMn8|A0ekU
zTf-OpOPJ}PS5>M**xDnkxMVkFjS7rsi7~k@$YG23>Ziq#&^>$3`E3p}ej<d}z3291
zs$hM`beJYCR8ZjX>gT6S*0yOk(h9W^C;0155nHk!f2r(L%}ftS?u}+`yH_`}n>(gi
z2q>tF7U4+DT72N*d^GuF&rAApW+q;OlAHltMJ-dLF4@%Apr_qgXs=#nIV{6cC41KR
z+$ZP7)damX7aPLxQL!+-3e(4jO}$?*N7h@M!G4{d36ni0nti`tYq6)h`CaPpfX%Je
z#x5^{T-{y~t$AMW>7xY+ZF{idipBe`H<`qQFuBqEslKGVVOEKk{L0f(nofs+%p_Q5
z<GFnrn7uI)4<k7{J#C|HlgTM2O%n;Hq<SV16h2ck>FLJN0I7R-QuyN-EfJY)j1;Sw
zCLzI$H_=Ds``8jYE=%>^!4lmZj`GAWjn0yL%W<uT7W48V=)4IjlMDNh*7Jv7nxjM-
zcvV`8i4n0klXh=;MtbGXC(W}x^dmiK{kAT>?!Pp1`gp??9UN=gL+41yEo+IZ`MKI=
zX)03tdrj_oMzkde7l;(SRh5o6LD|Ww72Ga55n*xLNg*FTA$=0rWzcKeZ@{X1LOyXk
zPQ*~hnv6YG3|WesEs{!lZ+~Y+!e6gXH-+QYfkmRrXFpuO{g<nnF|4QIhB=YpXsq>2
zULMO4g!N%B4tc$cd?_t%mG_83H;iH%$MWK7%yvVyVkSybq{k_OSB0UQ?VYu+1NF8#
zh5#`Z3CjjpR}*K~kx`*hp2ho-;cAC-CE4@LU0+%k^q)B|ZMJkg=-P*T389=Qjh7vh
z3xW-3&iq{lX4ssR+@sNSm#>dcJL~bdsF;daajS~Cv}SoeZ#)tnn$o0U@{Il1#qbWU
zBf-<pTb>of*j$sanaW>XuNFW*^t61LTv%P$pf~xx1$nD^ck-e}%|5S`l#i<L;K><M
zH{4sWB_RtTm?y?lx_GMi+<va8cftJ|^qadjFc>wX{U-!co4YRPK<Di*tcu^h++>o;
zE1YXjze%IY9HzCkaLlq`9iCZECMC4xdur{2cN>X}(!MC;NEOmg(Rsl+dK_cA8#xG*
zjf!wnHx&O;%#F7@RiTr8jb2tknVS&nWq!H7(D`{lChJLta1Y0rDjr`R`lQO_f_2<u
zt9X=VwzW8}t>abejM`<m`g*I4tB`Q>lYs=OileEnr57>BE;MNkl1DrnKA*-s2&>4v
z+5EB00D@!Z!t2Ukc(TqPHY@f{xvsD-?S(&^s?qvLkP6pH#!)1cC$g@mef27Pr!e1F
z7cR5=_naS=FBP3mlW0jO<f)D|h#{Xne-<jn8{zQsY{iW-tLN<#NIjxs*e$cW1>Y8O
z7iW>^^V8!=*N>C^KCP{o&&$;i>|vh^Bj;b`jB~x75`EwkGTvexd`JXqUaX9B*iW8)
zJ=xTEIVEn+wzg)lkx5!`i~e#=9O3VzXZ!b^`kN2OpwRy$0zbh#Dn|FS^RSKF>$<~%
z?R)^B;`V<u0e%NGchErU3w|^(wt+=zgTNciZ@|WbJ`u#IZMKo^-vtpn@Z~Q_bu5@L
zc@V()sMzFRy%NL@c1e}^2SXPJJ09kEOR!yp0?|)7u=%lrri+8*o#76c{u{grlSj#+
z5YjN&AMmEk4!-{XVKFCTJv~9xTt*A)<^=-XKl(7<Zf*`(5(&if#m$|GUI6(0p_3F~
zfhT)`Qv*mS90ixfAkebX2q=0-SCAiX2^bK4@L<{oM@s;%o>&m+#$y4WpK@p@0*a9M
zEt~Tr<DDQNs*Hlb{`mlCSy`kk-~{Z@5J(WsrG5a?4h<~}13}t<(_nBU=;A+UFe-xm
zZyH)w?r%P{90=w9n-3;0`<E<C9?XdU;DaMjpzr@J3rC>AocvE36+{1nhNQyEf70Z@
zr1wu6<}Vw-QOLh+07w0;GuWQ`YYr3~^Ow#j6yh)aP$<-2>qVpF|FR1j{kJR{E%)2|
zC}i-r3{M8pb3n$77yyO{nDw9V@Sp(OI|u9%QJZ<d_NJf?Gyt39vIrPbLtb7>4JEIs
xsfE!%%EHk|IdyeSl&U-i1(Q_*{yU2ub;o;Azy`v0tf4VTd5DOJrm+^}{{h`tB!mC}

literal 0
HcmV?d00001

diff --git a/vignettes/linl.Rmd b/vignettes/linl.Rmd
new file mode 100755
index 0000000..395a879
--- /dev/null
+++ b/vignettes/linl.Rmd
@@ -0,0 +1,48 @@
+---
+author:
+- Aaron Wolen
+- Your Organization
+opening: To whom it may concern,
+closing: Sincerely,
+date: 12 December 2020
+address: 
+- 123 Street Rd
+- Chicago, IL
+return-address: 
+- My Home
+- 456 Road St.
+- New York, NY
+cc:
+- Recipient 1
+- Recipient 2
+encl:
+- Enclosure 1
+- Enclosure 2
+ps: |
+  PS Lorem ipsum dolor sit amet, *consectetur* adipiscing elit.
+fontfamily: mathpazo
+fontsize: 12pt
+geometry: margin=1in
+blockquote: true
+letterhead: examples/letterhead.pdf
+signature: examples/signature.pdf
+signature-before: -8ex
+signature-after: 0ex
+closing-indentation: 0pt
+links-as-notes: true
+colorlinks: true
+
+output: linl::linl
+
+vignette: >
+  %\VignetteIndexEntry{linl}
+  %\VignetteKeywords{linl,vignette}
+  %\VignettePackage{linl}
+  %\VignetteEngine{knitr::rmarkdown}
+---
+
+Lorem ipsum dolor sit amet, consectetur adipiscing elit. Proin mollis dolor vitae tristique eleifend. Quisque non ipsum sit amet velit malesuada consectetur. Praesent vel facilisis leo. Sed facilisis varius orci, ut aliquam lorem malesuada in. Morbi nec purus at nisi fringilla varius non ut dui. Pellentesque bibendum sapien velit. Nulla purus justo, congue eget enim a, elementum sollicitudin eros. Cras porta augue ligula, vel adipiscing odio ullamcorper eu. In tincidunt nisi sit amet tincidunt tincidunt. Maecenas elementum neque eget dolor [egestas fringilla](http://example.com):
+
+> Nullam eget dapibus quam, sit amet sagittis magna. Nam tincidunt, orci ac imperdiet ultricies, neque metus ultrices quam, id gravida augue lacus ac leo. 
+
+Vestibulum id sodales lectus, sed scelerisque quam. Nullam auctor mi et feugiat commodo. Duis interdum imperdiet nulla, vitae bibendum eros placerat non. Cras ornare, risus in faucibus malesuada, libero sem fringilla quam, ut luctus enim sapien eget dolor.