When working with multiple patterns that will be woven into a template,
it makes sense to have all patterns stored in a central object. This
function creates that object from a named vector of filenames to be used
in further generation, importing the files via
A named vector of filenames which will be imported as patterns stored in the returned draft, with the names used as indices. Files should be plain text.
Returns a list (the same length as ...) containing the imported patterns.
pattern_file <- tempfile("out", tempdir(), ".Rmd") export_template("my sample pattern", pattern_file) import_draft("sample_pattern" = pattern_file)#> $sample_pattern #>  "my sample pattern" #>