這裏是代碼顯示問題:使用「貓」寫非英文字符爲.html文件(以R)
myPath = getwd()
cat("abcd", append = T, file =paste(myPath,"temp1.html", sep = "\\")) # This is fine
cat("<BR/><BR/><BR/>", append = T, file =paste(myPath,"temp1.html", sep = "\\")) # This is fine
cat("שלום", append = F, file =paste(myPath,"temp1.html", sep = "\\")) # This text gets garbled when the html is opened using google chrome on windows 7.
cat("שלום", append = F, file =paste(myPath,"temp1.txt", sep = "\\")) # but if I open this file in a text editor - the text looks fine
# The text in the HTML folder would look as if I where to run this in R:
(x <- iconv("שלום", from = "CP1252", to = "UTF8"))
# But if I where to try and put it into the file, it wouldn't put anything in:
cat(x, append = T, file =paste(myPath,"temp1.html", sep = "\\")) # empty
編輯: 我用下面也嘗試編碼(沒有成功)
ff <-file(paste(myPath,"temp1.html", sep = "\\"), encoding="CP1252")
cat("שלום", append = F, file =ff)
ff<-file(paste(myPath,"temp1.html", sep = "\\"), encoding="utf-8")
cat("שלום", append = F, file =ff)
ff<-file(paste(myPath,"temp1.html", sep = "\\"), encoding="ANSI_X3.4-1986")
cat("שלום", append = F, file =ff)
ff<-file(paste(myPath,"temp1.html", sep = "\\"), encoding="iso8859-8")
cat("שלום", append = F, file =ff)
有什麼建議嗎?謝謝。
它看起來像你需要一些睡眠... =) 'Sys.sleep(樣品(3600 * 1.5:8.5,1))' – aL3xa
看看這個問題[關於使用UTF-8編碼保存csv](http://stackoverflow.com/q/7402307/168747)。 – Marek
嗨馬雷克,當我嘗試使用它時,我得到的文字變成「\ xf9 \ xec \ xe5 \ xed」 –