Writing data isn't preserving encoding

Question

I have a string like the following:

str <- \"ていただけるなら\"
Encoding(str) #returns \"UTF-8\"

I write it to disk:

write.table         


        

Answer 1

Have you tried using argument fileEncoding ?

write.table(str, file="chartest", quote=F, col.names=F, row.names=F, fileEncoding="UTF-8")