[R] Using expression in Hmisc Key()

[Michael Kubovy]

Dear r-helpers,

How do I tell xYplot() and Key() that I want the labels in italic?

I tried this:

pdf(file = "khw.pdf", width = 8, height = 8)
with(subset(khw, length < 1.6), xYplot(lo ~ length|sub, groups = v,
aspect="xy", pch = c(1, 2, 16), col = c(2, 4, 9),
xlab=expression(frac(abs(bolditalic(v) ), abs(bolditalic(a)))),
ylab = grid::textGrob(expression(paste(log, ~~frac(italic(p) 
(italic(v)), italic(p)(italic(a))))) ),
panel=function(x,y,...){
	panel.xYplot(x, y, ...)
	panel.lmline(x, y, type = "l")
	}))
Key(x = 0.667, y = 0.833, other = list(title = expression(italic(v)),  
cex.title = 1,
	labels = c(expression(italic(b)), expression(italic(c)),  
expression(italic(d)))))
dev.off()

This works only for the title.
_____________________________
Professor Michael Kubovy
University of Virginia
Department of Psychology
USPS:     P.O.Box 400400    Charlottesville, VA 22904-4400
Parcels:    Room 102        Gilmer Hall
         McCormick Road    Charlottesville, VA 22903
Office:    B011    +1-434-982-4729
Lab:        B019    +1-434-982-4751
Fax:        +1-434-982-4766
WWW:    http://www.people.virginia.edu/~mk9y/