# NOT RUN {
temp_file_path <- file.path(tempdir(), "test.Rmd")
file.copy(system.file("examples", "example4.Rmd", package = "namer"),
temp_file_path,
overwrite = TRUE)
unname_all_chunks(temp_file_path)
if(interactive()){
file.edit(temp_file_path)
}
# }
Run the code above in your browser using DataLab