Dear all,

I have a rather complicated problem. I am trying to loop through making graphs, 
so that the graph-making process is fully automated. For each graph, I'd like to 
make sure the corresponding title is formatted properly. The titles will be a 
combination of a gene name and numerical position within the gene. The gene name 
should be italic-bold, whereas the gene position should be just bold.

Consider the following:

x <- read.table(textConnection("gene position
FLC 3312
TFL1 687
GA1 1127"), header = TRUE, as.is = TRUE)
closeAllConnections()

Now this, below, is essentially how I am automating the graph-making (imagine 
these graphs contain some sort of real data):

par(mfrow = c(3,1))
for (i in 1:nrow(x)){
    plot(z <- sort(rnorm(47)), type = "s", main = "")
    points(z, cex = .5, col = "dark red")
    title(main = paste(x[i,1], " p", x[i,2], sep = ""))
    }

The graphs produced by this method are almost perfect, except that the gene 
names are not italicized (they SHOULD be). 


So, once again, the big question is: how would I italicize the gene names but 
NOT the gene positions, when looping through to make these graphs and graph 
titles? If I WASN'T looping to make my graph titles, I could write:

title(main = expression(paste(bolditalic("FLC"), bold("p3312"), sep = " ")))

...but I can't do that, because I'm looping (or can I?)

Thanks in advance for your help!

-----------------------------------
Josh Banta, Ph.D
Center for Genomics and Systems Biology
New York University
100 Washington Square East
New York, NY 10003
Tel: (212) 998-8465
http://plantevolutionaryecology.org


      
	[[alternative HTML version deleted]]

