Convert a data frame to a teaching entry

Description

Convert a data frame to a teaching entry

Usage

teaching_entry(
  data,
  title = "title",
  course_name = "course_name",
  course_num = "course_num",
  institution = "institution",
  institution_url = NULL,
  location = "location",
  date = "date",
  size = "size",
  modality = "modality",
  links = NULL
)

Arguments

data A data frame with teaching information
title The column name for the position title. Default is "title"
course_name The column name for the course name. Default is "course_name"
course_num The column name for the course number. Default is "course_num"
institution The column name for the institution. Default is "institution"
institution_url The column name for institution URL. Default is NULL
location The column name for the location. Default is "location"
date The column name for the date. Default is "date"
size The column name for class size. Default is "size"
modality The column name for modality. Default is "modality"
links A list of column name pairs for icons. Default is NULL

Value

A string with the teaching entry

Examples

library("apatypstcv")

teaching <- data.frame(
  title = "Instructor",
  course_name = "Introduction to Psychology",
  course_num = "PSYC 101",
  institution = "University of Nebraska-Lincoln",
  location = "Lincoln, NE",
  date = "Fall 2024",
  size = "25-30 students",
  modality = "In-person",
  website = "https://example.com",
  syllabus = ""
)

teaching_entry(teaching, links = list(c("website", "globe")))
```{=typst}
#resume-entry(title: [Instructor, Introduction to Psychology],location: [Lincoln, NE],date: [Fall 2024],description: [University of Nebraska-Lincoln, PSYC 101 #linebreak() #text(fill: color-gray)[25-30 students, In-person]],icons: [#link("https://example.com")[#fa-icon("globe")]],)
```