print(seqToHumanReadable(1:2)) # "1, 2"
print(seqToHumanReadable(1:2, tau=1)) # "1-2"
print(seqToHumanReadable(1:10)) # "1-10"
print(seqToHumanReadable(c(1:10, 15:18, 20))) # "1-10, 15-18, 20"
Run the code above in your browser using DataLab