Специальные символы на языке R - PullRequest
4 голосов
/ 06 февраля 2012

У меня есть таблица, которая выглядит следующим образом:

1β              2β     
1.0199e-01        2.2545e-01       
2.5303e-01        6.5301e-01
1.2151e+00        1.1490e+00

и так далее ...

Я хочу составить коробочный график из этих данных.Команды, которые я использую, таковы:

pdf('rtest.pdf')
 w1<-read.table("data_CMR",header=T)
 w2<-read.table("data_C",header=T)
boxplot(w1[,], w2[,], w3[,],outline=FALSE,names=c(colnames(w1),colnames(w2),colnames(w3)))
dev.off()

Проблема в том, что вместо символа бета (β) я получаю две точки (..) в выводе.решить эту проблему.

Заранее спасибо.

Ответы [ 3 ]

3 голосов
/ 06 февраля 2012

Предложение использовать check.names предотвратит добавление "X" к "1β" и "2β", что в противном случае произошло бы даже после того, как кодировка отсортирована (поскольку имена столбцов не должны начинаться с цифр.(Можно также просто использовать аргумент «names» для боксплота.)

w1<-read.table(text="1β              2β     
 1.0199e-01        2.2545e-01       
 2.5303e-01        6.5301e-01
 1.2151e+00        1.1490e+00",header=TRUE, check.names=FALSE, fileEncoding="UTF-8")
boxplot(w1)

enter image description here

3 голосов
/ 06 февраля 2012

Это также работает

pdf('rtest.pdf')
w1<-read.table("data_CMR",header=T) 
w2<-read.table("data_C",header=T) 
one<-expression(paste("1", beta,sep="")) 
two <- expression(paste("2", beta,sep="")) 
boxplot(w1[,], w2[,], w3[,],outline=FALSE, names=c(one,two)) 
dev.off()
0 голосов
/ 06 февраля 2012

Это может быть проблема с кодировкой. Попробуйте добавить encoding='UTF-8' к вашим read.table заявлениям.

w1<-read.table("data_CMR",header=T,encoding='UTF-8')
Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...