## ----include = FALSE----------------------------------------------------------
knitr::opts_chunk$set(collapse = TRUE, comment = "#>")

## ----eval=FALSE---------------------------------------------------------------
# library(tutorizeR)
# 
# work_dir <- file.path(tempdir(), "tutorizeR-feedback")
# 
# report <- tutorize(
#   input = file.path(work_dir, "lesson-source.qmd"),
#   output_dir = work_dir,
#   format = "learnr",
#   assessment = "code",
#   overwrite = TRUE
# )
# 
# print(report)