Вывод файла UTF-8 в R

Я использую R 2.15.0 в 64-разрядной версии Windows 7. Я хотел бы вывести текст Unicode (CJK) в файл.

В следующем коде показано, как символ Unicode, отправленный для записи при подключении к файлу UTF-8, не работает так, как (I) ожидалось:

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)

Как видно из результатов сканирования:

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

Файл не был записан с сам символ UTF, но какой-то запасной вариант, совместимый с ANSI. Могу ли я заставить его работать правильно с первого раза (т. е. с текстовым файлом, в котором вместо этого есть «在»), или я могу использовать дополнительную магию для преобразования вывода в Unicode с правильным символом, заменяющим строку кода?

Спасибо.

[Дополнительная информация: тот же код работает правильнов Cygwin, R 2.14.2, а 2.14.2 на Win7 также не работает. Это где-то на моем конце?]