Render a CV section from a data frame

Iterates over a CV data frame and writes each row as a Typst CV entry by calling .cv_entry() for each row and passing the result to base::cat().

Usage

cv_render_section(
  data,
  title_col,
  org_col = NULL,
  detail_col = NULL,
  date_fun = .cv_date_range,
  where_col = "where"
)

Arguments

data

A data frame containing CV entries. Typically one element of the list returned by read_cv_data(), e.g. cv$experience.

title_col

A character string. Name of the column to use as the entry title. Required.

org_col

A character string or NULL. Name of the column to use as the organization or secondary text. Defaults to NULL.

detail_col

A character string or NULL. Name of the column to use as additional detail. Defaults to NULL.

date_fun

A function or NULL. Called with each row to produce the date string. Defaults to .cv_date_range(). Pass NULL for sections without dates.

where_col

A character string or NULL. Name of the column to use as the location. Defaults to "where". Pass NULL to omit location.

Value

Invisibly returns NULL. Called for its side effect of writing Typst blocks to the Quarto document output stream.

Details

This function is intended to be called inside a Quarto document chunk with results = 'asis'. The cat() call writes raw Typst blocks directly into the document output stream. Nothing is returned — the function is called entirely for its side effect.

For sections that use dates, pass one of .cv_date_range() or .cv_year_range() as date_fun. For sections where dates are not relevant (skills, affiliations), pass date_fun = NULL.

Examples

# \donttest{
# Load sample data and render the experience section
cv <- read_cv_data(
  system.file("extdata", "cv-data-template.xlsx", package = "curriculr")
)
cv_render_section(cv$experience,
                  title_col  = "title",
                  org_col    = "unit",
                  detail_col = "detail")
#> 
#> ```{=typst}
#> #grid(
#>   columns: (1fr, 1.68in),
#>   gutter: 0.65em,
#>   [
#>     #text(size: 9.15pt, weight: "semibold", fill: dark)[Adjunct Instructor, Illustration]\
#>     #text(size: 8.25pt, fill: bodygray)[Pacific Northwest College of Art — Taught Introduction to Editorial Illustration and Advanced Character Design. Mentored portfolio students seeking industry entry.]
#>   ],
#>   [#align(right)[#text(size: 8.1pt, fill: accent)[Sep 2005 - May 2014\
#> Portland, OR]]]
#> )
#> #v(0.36em)
#> ```
#>  
#> ```{=typst}
#> #grid(
#>   columns: (1fr, 1.68in),
#>   gutter: 0.65em,
#>   [
#>     #text(size: 9.15pt, weight: "semibold", fill: dark)[Principal Illustrator]\
#>     #text(size: 8.25pt, fill: bodygray)[Frank Palmer Illustration (Self-Employed) — Independent studio practice serving editorial, publishing, and advertising clients. Clients include The New Yorker, Penguin Random House, Nike, and Wired.]
#>   ],
#>   [#align(right)[#text(size: 8.1pt, fill: accent)[Jan 1997 - Present\
#> Portland, OR]]]
#> )
#> #v(0.36em)
#> ```
#>  
#> ```{=typst}
#> #grid(
#>   columns: (1fr, 1.68in),
#>   gutter: 0.65em,
#>   [
#>     #text(size: 9.15pt, weight: "semibold", fill: dark)[Staff Illustrator]\
#>     #text(size: 8.25pt, fill: bodygray)[The Portland Tribune — Created editorial illustrations for weekly features, covers, and special sections. Produced 3–5 finished pieces per week under daily deadline pressure.]
#>   ],
#>   [#align(right)[#text(size: 8.1pt, fill: accent)[Mar 1994 - Dec 1996\
#> Portland, OR]]]
#> )
#> #v(0.36em)
#> ```
# }

if (FALSE) { # \dontrun{
# The following examples are intended to be called inside a Quarto chunk
# with results = 'asis'. They require internal helpers and a loaded cv object.

# Year-only dates
cat(.cv_section("Education"))
cv_render_section(cv$education,
                  title_col  = "title",
                  org_col    = "institution",
                  detail_col = "detail",
                  date_fun   = .cv_year_range)

# No dates, no location
cat(.cv_section("Skills"))
cv_render_section(cv$skills,
                  title_col = "title",
                  org_col   = "unit",
                  date_fun  = NULL,
                  where_col = NULL)

# Custom inline date function
cat(.cv_section("Presentations"))
cv_render_section(cv$presentations,
                  title_col = "unit",
                  org_col   = "title",
                  date_fun  = function(row) {
                    trimws(paste(.cv_value(row, "startMonth"),
                                 .cv_value(row, "startYear")))
                  })
} # }