これは、このフォーラムでの私の以前の質問への参照です。入力ファイルに中国語の名前を含む棒グラフをプロットする方法は?
私はすでに私のsessionInfoように編集しました:
> sessionInfo()
R version 2.14.1 (2011-12-22)
Platform: x86_64-unknown-linux-gnu (64-bit)
locale:
[1] LC_CTYPE=zh_CN.UTF-8 LC_NUMERIC=C
[3] LC_TIME=zh_CN.UTF-8 LC_COLLATE=zh_CN.UTF-8
[5] LC_MONETARY=zh_CN.UTF-8 LC_MESSAGES=zh_CN.UTF-8
[7] LC_PAPER=C LC_NAME=C
[9] LC_ADDRESS=C LC_TELEPHONE=C
[11] LC_MEASUREMENT=zh_CN.UTF-8 LC_IDENTIFICATION=C
attached base packages:
[1] stats graphics grDevices utils datasets methods base
loaded via a namespace (and not attached):
しかし、スクリプトを実行するとa.txt
a.txt
x <- read.csv(textConnection("名称,类,学生
木材,2,2
表,3,4
笔,4,2
垃圾桶,5,6
杯,6,3"), header = TRUE)
rownames(x) <- x[,1]
x <- x[,-1]
barplot(t(x), horiz = TRUE, beside = TRUE, legend.text = TRUE, xlab="名称类学生")
source("a.txt",encoding="UTF-8")
漢字の代わりに奇妙な文字が表示されます (下の画像を参照)。どうすればそれらを回避できますか?
