Dựa trên bài viết SO này , bạn có thể phải viết dữ liệu của bạn vào đĩa với mã hóa UTF-8. Hãy thử điều này:
data <- dbGetQuery(credentials, Query)
con <- file('output.csv', encoding="utf8")
write.csv(data, file=con)
Sau đó, hãy thử mở output.csv trong cả Excel và Notepad ++ và cho chúng tôi biết kết quả. Khi bạn đọc lại tệp này thành R, hy vọng tệp sẽ hoạt động như mong đợi:
fread("test.csv", encoding="UTF-8")
