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/