[R] text(x,y,greek character)

From: Roy Little <rlittle_at_ula.ve>
Date: Mon 10 Oct 2005 - 21:59:14 EST


Dear list,
I would like to plot points with two types of labels, one at the data point (the name of the point) and another offset a bit with another factor which is either of the two greek characters alpha or beta. I have tried to get the routine to plot a greek character with expression() or with substitute() and have not yet had any success. The following only plots the word in english in plain text. Here is my subroutine and data:



vmat<-as.matrix(read.table("vmat"))
Xm<-vmat[1:22,1:20]
hemd<-read.table("threehem",header=T)
Ym<-as.matrix(hemd[,2])
gvdw.pls<-plsr(Ym ~ Xm,6,method="kernelpls") rsltv<-predict(gvdw.pls,comps=6)
plot(Ym,rsltv,type="n",xlab="Actividad + Biológica",xlim=c(4.6,6),ylim=c(4.8,6),ylab=" Act. + Biol.(Pred.)",main="QSAR Ligación de Derivados de la Artemisina con + Hemina",sub="Descriptores de Coeficientes VdW")

text(Ym,rsltv,labels=threehem$cpd)
text(Ym,rsltv,labels=hemd$type,adj=c(0,-1))



threehem:
"cpd" "ba" "deox" "ox" "hemin" "type"
"1" 1 4.89 -5.32 -5.11 -5.18 alpha
"2" 2 4.89 -5.12 -4.92 -5.12 beta
"3" 3 5.41 -5.62 -5.41 -5.56 alpha
"4" 4 5.47 -5.34 -5.09 -5.3 beta
"5" 5 5.21 -5.41 -5.12 -5.36 beta
"6" 6 5.28 -5.44 -5.14 -5.39 beta
"7" 7 5.16 -5.47 -5.17 -5.39 beta
"8" 8 4.8 -5.43 -5.03 -5.41 beta
"9" 9 4.92 -5.17 -4.9 -5.12 beta
"10" 10 5.02 -5.29 -4.94 -5.35 beta
"11" 11 5.18 -5.72 -5.38 -5.68 alpha
"12" 12 5.44 -5.53 -5.39 -5.66 alpha
"13" 13 5.71 -5.93 -5.64 -5.86 alpha
"14" 14 5.74 -6.01 -5.78 -5.91 alpha
"15" 15 5.75 -5.79 -5.61 -5.71 alpha
"16" 16 5.87 -5.97 -5.67 -5.94 alpha
"17" 17 5.37 NA NA -6.49 alpha
"18" 18 5.75 NA NA -6.5 alpha
"19" 19 5.04 -5.26 NA -5.17 beta
"20" 20 4.89 -5.04 -4.75 -4.98 beta
"21" 21 5.81 -5.71 NA -5.87 alpha
"22" 22 5.62 -6.11 NA -6.23 alpha


I have included the Xm matrix of predictors as an attachment. Thank you very much for your help.

Roy Little
Dept. Chem.
Facultad de Ciencias
Universidad de los Andes
Mérida, Venezuela

-0.12 -0.18 -0.41 0.14 -0.21 0.15 -0.25 -0.41 -0.41 -0.29 -0.28 -0.27 -0.43 -0.39 -0.43 -0.5 -0.3 -0.25 -0.4 0.06 4.89
-0.2 -0.16 -0.38 0.15 -0.2 0.15 -0.24 -0.42 -0.43 -0.3 -0.3 -0.29 -0.44 -0.39 -0.43 -0.51 -0.27 -0.26 -0.41 0.19 4.89
-0.11 -0.19 -0.41 0.14 -0.21 0.14 -0.27 -0.4 -0.4 -0.29 -0.28 -0.26 -0.42 -0.38 -0.44 -0.5 -0.3 -0.24 -0.4 0.03 5.41
-0.18 -0.16 -0.38 0.15 -0.2 0.15 -0.24 -0.42 -0.42 -0.31 -0.3 -0.29 -0.44 -0.39 -0.43 -0.51 -0.27 -0.26 -0.41 0.19 5.47
-0.2 -0.16 -0.38 0.15 -0.2 0.15 -0.24 -0.42 -0.42 -0.31 -0.3 -0.29 -0.44 -0.39 -0.43 -0.5 -0.27 -0.26 -0.4 0.19 5.21
-0.18 -0.16 -0.38 0.15 -0.2 0.15 -0.24 -0.42 -0.42 -0.31 -0.3 -0.29 -0.44 -0.39 -0.43 -0.51 -0.27 -0.26 -0.4 0.19 5.28
-0.18 -0.16 -0.38 0.15 -0.2 0.15 -0.24 -0.42 -0.42 -0.31 -0.3 -0.29 -0.44 -0.39 -0.43 -0.51 -0.27 -0.26 -0.41 0.19 5.16
-0.18 -0.16 -0.38 0.15 -0.21 0.15 -0.25 -0.42 -0.42 -0.31 -0.3 -0.29 -0.44 -0.39 -0.43 -0.51 -0.27 -0.26 -0.4 0.19 4.8
-0.18 -0.16 -0.38 0.15 -0.2 0.15 -0.24 -0.42 -0.42 -0.31 -0.3 -0.29 -0.44 -0.39 -0.43 -0.51 -0.27 -0.26 -0.4 0.19 4.92
-0.23 -0.14 -0.35 0.15 -0.2 0.15 -0.25 -0.4 -0.43 -0.33 -0.32 -0.3 -0.44 -0.39 -0.41 -0.51 -0.24 -0.26 -0.39 0.18 5.02
-0.15 -0.22 -0.44 0.14 -0.21 0.13 -0.29 -0.39 -0.41 -0.26 -0.24 -0.22 -0.39 -0.35 -0.44 -0.48 -0.33 -0.19 -0.39 -0.02 5.18
-0.12 -0.2 -0.42 0.14 -0.21 0.14 -0.28 -0.4 -0.41 -0.29 -0.27 -0.25 -0.41 -0.37 -0.44 -0.49 -0.31 -0.22 -0.39 0 5.44
-0.14 -0.19 -0.42 0.14 -0.21 0.14 -0.26 -0.41 -0.41 -0.28 -0.26 -0.25 -0.42 -0.39 -0.46 -0.49 -0.31 -0.23 -0.37 0.01 5.71
-0.16 -0.23 -0.44 0.14 -0.21 0.13 -0.29 -0.4 -0.4 -0.26 -0.23 -0.22 -0.4 -0.36 -0.45 -0.48 -0.33 -0.19 -0.38 -0.02 5.74
-0.14 -0.23 -0.43 0.14 -0.21 0.14 -0.28 -0.39 -0.4 -0.28 -0.26 -0.24 -0.38 -0.35 -0.42 -0.49 -0.32 -0.21 -0.39 -0.01 5.75
-0.14 -0.23 -0.43 0.14 -0.21 0.14 -0.28 -0.4 -0.4 -0.27 -0.25 -0.23 -0.37 -0.34 -0.4 -0.48 -0.32 -0.2 -0.39 -0.01 5.87
-0.22 -0.15 -0.36 0.15 -0.2 0.16 -0.24 -0.44 -0.43 -0.26 -0.26 -0.27 -0.38 -0.35 -0.32 -0.49 -0.27 -0.25 -0.34 0.05 5.37
-0.2 -0.27 -0.42 0.14 -0.2 0.15 -0.23 -0.34 -0.41 -0.28 -0.29 -0.28 -0.39 -0.34 -0.28 -0.46 -0.32 -0.26 -0.26 0.05 5.75
-0.18 -0.16 -0.38 0.15 -0.21 0.15 -0.25 -0.41 -0.42 -0.31 -0.3 -0.29 -0.44 -0.39 -0.43 -0.51 -0.27 -0.26 -0.4 0.19 5.04
-0.23 -0.13 -0.35 0.15 -0.2 0.16 -0.24 -0.41 -0.44 -0.32 -0.31 -0.3 -0.44 -0.39 -0.41 -0.51 -0.25 -0.26 -0.41 0.19 4.89
-0.22 -0.09 -0.35 0.15 -0.2 0.15 -0.26 -0.45 -0.45 -0.28 -0.26 -0.25 -0.41 -0.34 -0.36 -0.5 -0.27 -0.23 -0.34 0.01 5.81
-0.23 -0.13 -0.37 0.15 -0.2 0.14 -0.28 -0.43 -0.44 -0.26 -0.23 -0.22 -0.4 -0.33 -0.39 -0.49 -0.28 -0.2 -0.34 -0.01 5.62
-0.12 -0.18 -0.41 0.14 -0.21 0.15 -0.25 -0.42 -0.41 -0.3 -0.29 -0.28 -0.43 -0.43 -0.39 -0.51 -0.3 -0.26 -0.4 0.14 NA


______________________________________________

R-help@stat.math.ethz.ch mailing list
https://stat.ethz.ch/mailman/listinfo/r-help PLEASE do read the posting guide! http://www.R-project.org/posting-guide.html Received on Mon Oct 10 22:09:29 2005

This archive was generated by hypermail 2.1.8 : Fri 03 Mar 2006 - 03:40:41 EST