Displaying 1 result from an estimated 1 matches for "te129m".
Did you mean:
te120p
2005 Jun 22
1
How to use expression in label with xYplot
...o use the label function (from Hmisc library) to allow for the
names of my isotopes.
library(Hmisc)
library(lattice)
library(grid)
num <- c("78","137","129m")
nom <- c("Ge","Cs","Te")
df <- data.frame(GE78=seq(nom),CS137=seq(nom),TE129m=seq(nom))
if I use this function to create the labels :
lab <- function(i)
as.expression(bquote(italic(phantom(0)^{.(num[i])}*.(nom[i]))))
label(df$GE78) <- lab(1)
label(df$CS137) <- lab(2)
label(df$TE129m) <- lab(3)
all works fine when I use text and xyplot :
plot(1:10)
text(...