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.
Because the plot actually plots, there is no error message reported. I'm
interested in getting the call statement to work as intended.
Again, my apologies for being unclear in my first posting, this list is a
great resources and I learn from everyone daily.
Thanks
Steve
Steve Friedman Ph. D.
Spatial Statistical Analyst
Everglades and Dry Tortugas National Park
950 N Krome Ave (3rd Floor)
Homestead, Florida 33034
[email protected]
Office (305) 224 - 4282
Fax (305) 224 - 4147
David Winsemius
<dwinsem...@comca
st.net> To
[email protected]
04/30/2009 06:34 cc
PM AST [email protected]
Subject
Re: [R] setting key boxes in xyplot
On Apr 30, 2009, at 10:35 AM, [email protected] wrote:
>
> I thought I mimicked the coded correctly, but find an error/omission
> somewhere in the xyplot function shown below.
>
>> eggs # alligator egg fate
>
> dput(round(eggs, 2), file = "")
> structure(list(Year = c(1985, 1986, 1987, 1988, 1989, 1990, 1991,
> 1992, 1993, 1994, 1995, 1996, 1997, 1998, 1999, 2000), NumEggs =
> c(323,
> 1729, 1127, 104, 267, 291, 352, 478, 532, 569, 263, 490, 244,
> 428, 527, 670), Failed = c(183, 199, 257, 503, 99, 139, 273,
> NA, 0, 55, 237, 581, 271, 144, 117, 43), Mean = c(0.29, 0.49,
> 0.55, 0.45, 0.26, 0.34, 0, 0.49, 0.77, 0.57, 0.77, NA, 0.69,
> 0.64, 0.51, 0.66), Eggs.p = c(0.19, 1, 0.65, 0.06, 0.15, 0.17,
> 0.2, 0.28, 0.31, 0.33, 0.15, 0.28, 0.14, 0.25, 0.3, 0.39), Fail.p =
> c(0.31,
> 0.34, 0.44, 0.87, 0.17, 0.24, 0.47, NA, 0, 0.09, 0.41, 1, 0.47,
> 0.25, 0.2, 0.07)), .Names = c("Year", "NumEggs", "Failed", "Mean",
> "Eggs.p", "Fail.p"), row.names = c("1985", "1986", "1987", "1988",
> "1989", "1990", "1991", "1992", "1993", "1994", "1995", "1996",
> "1997", "1998", "1999", "2000"), class = "data.frame")
>
>
> 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), type = c("b", "b", "h"),
> key = list(text = list(c("Proportion Hatched R^2 = 0.13,
> Proportion Flooded R^2 = -0.23, Mean HSI")),
> col = c("black","red", "green")), columns = 3)
It runs without error on my machine ... after loading lattice. Perhaps
you ought to provide the error message .... and the other usual needed
information. See that nice compact but very imformative message at the
bottom of this reply.
--
David
David Winsemius, MD
Heritage Laboratories
West Hartford, CT
______________________________________________
[email protected] 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.
