Estou usando o R 2.15.0 no Windows 7 de 64 bits. Eu gostaria de saída texto unicode (CJK) para um arquivo.

O código a seguir mostra como um caractere Unicode enviado para gravar em uma conexão de arquivo UTF-8 não funciona como (I) esperado:

rty <- file("test.txt",encoding="UTF-8")
write("在", file=rty)
close(rty)
rty <- file("test.txt",encoding="UTF-8")
scan(rty,what=character())
close(rty)

Conforme mostrado pela saída da varredura:

Read 1 item 
[1] "<U+5728>"

O arquivo não foi gravado com o próprio caractere UTF, mas com algum tipo de fallback compatível com ANSI. Posso fazê-lo funcionar corretamente na primeira vez (por exemplo, com um arquivo de texto que tenha "在") ou posso usar alguma mágica extra para converter a saída para Unicode com o caractere adequado substituindo a string de código?

Obrigado.

[Mais informações: o mesmo código se comportadevidamente no Cygwin, R 2.14.2, enquanto 2.14.2 no Win7 também está quebrado. Isso está no meu fim em algum lugar?]