In labeleR: Automate the Production of Custom Labels, Badges, Certificates, and Other Documents

for (i in seq_along(params$collection.i)){
  cat("
\\begin{mdframed}[linewidth=2pt,linecolor=black, innerleftmargin = 1.5 cm, innerrightmargin = 1.5 cm]\n
\\pagenumbering{gobble}
\\begin{center}
\\bigskip
{\\fontsize{30pt}{100pt}\\selectfont\\bf", params$title, "} \\\\
\\end{center}
\\begin{flushright}
\\begin{minipage}[c][20ex][c]{15em}",
  if (params$qr.i[i] != "") "\\qrcode[height=2in, version=5]{",
  if (params$qr.i[i] != "") params$qr.i[i],
  if (params$qr.i[i] != "") "}",
"
\\end{minipage}
\\end{flushright}
\\begin{flushleft}
{\\fontsize{35pt}{100pt}\\selectfont\\bf",params$family.i[i]," } \\\\
\\vfill
{\\fontsize{35pt}{100pt}\\selectfont\\emph{",params$taxon.i[i],"} ",params$author.i[i],"} \\\\
\\end{flushleft}
\\begin{flushright}
{\\fontsize{22.55pt}{100pt}\\selectfont Det.", params$det.i[i]," ", params$date.det.i[i],"} \\\\
\\end{flushright}
\\vfill
\\bigskip
\\bigskip
\\begin{flushleft}
{\\fontsize{25pt}{100pt}\\selectfont", params$location.i[i],"} \\\\
{\\fontsize{25pt}{100pt}\\selectfont", params$area.description.i[i],"} \\\\
{\\fontsize{25pt}{100pt}\\selectfont Elevation:", params$elevation.i[i],"}\\\\
{\\fontsize{25pt}{100pt}\\selectfont", params$latitude.i[i], " | ", params$longitude.i[i],"} \\\\
\\vfill
{\\fontsize{25pt}{100pt}\\selectfont",params$field1.i[i],"} \\\\
{\\fontsize{25pt}{100pt}\\selectfont",params$field2.i[i],"} \\\\
{\\fontsize{25pt}{100pt}\\selectfont",params$field3.i[i],"} \\\\
\\end{flushleft}
\\vfill
\\begin{flushright}
{\\fontsize{20pt}{100pt}\\selectfont\\bf Collector: ",params$collector.i[i]," \\#",params$collection.i[i],"} \\\\
{\\fontsize{20pt}{100pt}\\selectfont With: ",params$assistants.i[i],"} \\\\
{\\fontsize{20pt}{100pt}\\selectfont ",params$date.i[i],"} \\\\
\\end{flushright}
\\vfill
\\begin{center}
{\\fontsize{25pt}{80pt}\\selectfont\\bf ",params$subtitle,"} \\\\
\\end{center}
\\end{mdframed}\n
\\pagebreak")
}

labeleR documentation built on April 3, 2025, 10:28 p.m.