※ 引述《empireisme (empireisme)》之銘言:
: 先附上我的程式碼
: Sys.setlocale("LC_ALL","cht")
: text <- "酶"
: Encoding(text)
: print(text)
: data1 <- data.frame(text)
: print(data1)
: print(data1$text)
: write.csv(data1,"test1.csv")
: write.csv(data1,"test2.csv",fileEncoding = "utf-8")
: 我想要寫入 酶這個字
: 結果不知道為何使用
: print(text) 會是正確的
: 但是print (data1) 就會出現 <U+9176>
: 我試兩個寫入方式 指定utf-8和否
: 寫入csv的時候都會試 <U+9176> 而非中文
: 想問如何處理
: 因為我通常寫入都是用data.frame存
library(reader)
write_excel_csv(data1,"f2.csv")
這個方法可以解決!
自問自答哈哈