r - 使用read.delim读取utf-8编码的汉字文件时出现R错误

Question

我有一个 utf-8 编码文件 test.txt，其中的值用分隔符分隔

a   b   c
小   小   大
小   大   小
大   小   小

我阅读以使用命令读取数据

Sys.setlocale("LC_CTYPE", "Chinese")
data <- read.delim("test.txt",encoding="UTF-8")

但是数据被读取为带有输出的数据帧

[1] X.U.FEFF.a b          c         
<0 rows> (or 0-length row.names)

我的系统是windows 7

如何正确读取数据？

Answer 1

我刚试过read.csv，效果很好。我测试了你的代码，也是read.delim开箱即用的。

> a <- read.csv('/tmp/test.txt', sep="\t", quote="", stringsAsFactors=FALSE)
> str(a)
'data.frame':   3 obs. of  3 variables:
 $ a: chr  "小" "小" "大"
 $ b: chr  "小" "大" "小"
 $ c: chr  "大" "小" "小"
> a
   a  b  c
1 小 小 大
2 小 大 小
3 大 小 小

> data <- read.delim("/tmp/test.txt", encoding="utf-8")
> data
   a  b  c
1 小 小 大
2 小 大 小
3 大 小 小

然后我尝试了你的Sys.setlocale命令，它对我不起作用，这表明在我测试将语言环境设置为德语后命令本身无效。

# ?Sys.setlocale:
# "Attempts to set an invalid locale are ignored. There may or may not be a warning, depending on the OS."
> Sys.setlocale("LC_CTYPE", "Chinese")
[1] ""
Warning message:
In Sys.setlocale("LC_CTYPE", "Chinese") :
  OS reports request to set locale to "Chinese" cannot be honored
> Sys.setlocale("LC_TIME", "de_DE")  # Mac OS X, in UTF-8
[1] "de_DE"
> Sys.getlocale()
[1] "en_US.UTF-8/en_US.UTF-8/en_US.UTF-8/C/de_DE/en_US.UTF-8"

要成功将语言环境设置为中文，您可以试试这个（从这里引用）：

Sys.setlocale("LC_ALL","zh_CN.utf-8")
> Sys.getlocale()
[1] "zh_CN.utf-8/zh_CN.utf-8/zh_CN.utf-8/C/zh_CN.utf-8/en_US.UTF-8"