# NOT RUN {
# create empty file.
fp <- file.path(tempdir(), "dummy")
file.create(fp)
# append lines to Dockerfile.
write_lines_to_file(c("# dummy line 1", "# dummy line 2"),
filepath = fp)
# prepend lines to Dockerfile.
write_lines_to_file(c("# dummy line 3", "# dummy line 4"),
filepath = fp, prepend = TRUE)
# }
Run the code above in your browser using DataLab