# NOT RUN {
### Get path to example source
examplePath <-
system.file("extdata", package="rock");
### Parse all example sources in that directory
parsedExamples <- rock::parse_sources(examplePath);
### Export results to a temporary directory
tmpDir <- tempdir(check = TRUE);
prettySources <-
export_to_html(input = parsedExamples,
output = tmpDir);
### Show first one
print(prettySources[[1]]);
# }
Run the code above in your browser using DataLab