首次来电。
我只想将字符串编码从UTF-8更改为LATIN1。我使用XPath从网页中检索数据:
>library(RCurl)
>library(rvest)
>library(XML)
>library(httr)
>library(reshape2)
>library(reshape)
>response <- GET(paste0("http://www.visalietuva.lt/imone/jogminda-uab-telsiai-muziejaus-g-35"))
>doc <- content(response,type="text/html")
>base <- xpathSApply(doc, "//ul//li//span",xmlValue)[5]
作为结果,我得到以下内容:
>base
[1] "El. paštas"
当我检查编码时,我的编码是UTF-8:
>Encoding(base)
[1] "UTF-8"
我怀疑我需要使用LATIN1编码。这样结果将会是"El. paštas",而不是"El. paÅ¡tas"。
尽管当我指定LATIN1编码时,我得到了以下结果:
>latin <- iconv(base, from = "UTF-8", to = "LATIN1")
[1] "El. paštas"
即使用UTF-8编码也无法获得与之相同的结果。更改编码方式不能获得"El. paštas"。
此外,我在保存数据到.csv文件时需要正确的LATIN1编码。我尝试将数据保存到.csv文件:
write.table(latin,file = "test.csv")
如果你遇到了和上面提到的一样的奇怪字符:"El. paÅ¡tas",那么该怎么改变编码呢?欢迎提供任何建议。谢谢。
write.table
和read.table
,而非做出假设呢?;-) 帮助文件?read.csv
中有一个关于编码的部分。 - lukeA