## input file
infile <- paste(system.file(package = "Orcs"), "DESCRIPTION", sep = "/")
## convert to dos line endings and write to output file
ofl = file.path(tempdir(), "DESCRIPTION4wd")
lineEnding(infile, outfile = ofl, to = "dos")
Run the code above in your browser using DataLab