On Fri, May 1, 2009 at 6:28 AM, David Winsemius <dwinsem...@comcast.net> wrote: > > On May 1, 2009, at 8:51 AM, steve_fried...@nps.gov wrote: > >> David and the list >> >> Yes the graph is produced with the code I submitted. However, I was not >> clear in my initial post. and it is totally my mistake for taking up >> everyone's valuable time. >> >> My main question focuses on the key which prints in black as opposed to >> using the colors ("black", "red" and "green"). The second question >> pertains to the use of superscripts. I'd like the R^2 values to actually >> use a exponent. > > This gives you at least part of what I imagine you may want: > > xyplot(Eggs.p + Fail.p + Mean ~ Year , data = eggs, cex = 0.8, pch = c(2, > 5), > panel = panel.superpose.2, main = "Alligator Nest Fate", > ylab = "Prop. of Total Number of Hatched Eggs \n Prop. of > Total > Flooded Eggs", > legend = list(right = list(fun = grid::textGrob("Mean HSI", > rot=90))), col=(1:3), > # I have not figured out what that legend is supposed to be doing. > > type = c("b", "b", "h"), > > # I find that plotting with the "h" options obscures the meaning. > # But it's your plot. > > key = list(text = list(c( > expression("Proportion Hatched "~R^2~" = 0.13"), > expression("Proportion Flooded "~R^2~" = -0.23"), > expression("Mean HSI"))), > col = c("black","red", "green")), columns = 3)
And a minor modification, in case the intention was to associate the colors with lines: xyplot(Eggs.p + Fail.p + Mean ~ Year , data = eggs, cex = 0.8, pch = c(2, 5), panel = panel.superpose.2, main = "Alligator Nest Fate", ylab = "Prop. of Total Number of Hatched Eggs \n Prop. of Total Flooded Eggs", legend = list(right = list(fun = grid::textGrob("Mean HSI", rot=90))), type = c("b", "b", "h"), col = c("black","red", "green"), key = list(text = list(expression("Proportion Hatched "~R^2~" = 0.13", "Proportion Flooded "~R^2~" = -0.23", "Mean HSI")), lines = list(col = c("black","red", "green")), columns = 1)) -Deepayan ______________________________________________ R-help@r-project.org mailing list https://stat.ethz.ch/mailman/listinfo/r-help PLEASE do read the posting guide http://www.R-project.org/posting-guide.html and provide commented, minimal, self-contained, reproducible code.