Por que o `cat` não é anexado a uma conexão` file`?

Eu corri estes dois blocos de código, esperando o mesmo resultado

cattest <- file("cattest.txt")
cat("First thing", file = cattest)
cat("Second thing", file = cattest, append = TRUE)
close(cattest)

sink("cattest_sink.txt")
cat("First thing")
cat("Second thing")
sink()

Mas o resultadocattest.txt contém apenas "segunda coisa", enquanto ocattest_sink.txt inclui o que eu esperava, "First thingSecond thing". Porque é oappend argumento ignorado com a conexão de arquivo?

Estou no 64bit R 3.0.1 no Windows, caso isso seja importante.

questionAnswers(2)

yourAnswerToTheQuestion