# NOT RUN {
paste_different_lengths(list(1:3, 1:4))
paste_different_lengths(list(1:3, 1:4), sep = "sSs")
setwd(tempdir())
writeLines(as.character(1:3), "PasteDifferentLengths1.txt")
writeLines(as.character(1:4), "PasteDifferentLengths2.txt")
paste_different_lengths(list.files(pattern = "PasteDifferentLengths"),
sep = "sSsepPp")
# clean up working directory
file.remove(list.files(pattern = "PasteDifferentLengths"))
# }
Run the code above in your browser using DataLab