There seems to be a limit on the size of the string used in message. The following only prints until number 1859 (Using R v3.1.3 on 64 bit Win7 machine)
message(paste(seq(1,2000),collapse = "-"))
while
cat(paste(seq(1,2000),collapse = "-"))
prints it all. Is this a bug?