color in xyplot

An embedded and charset-unspecified text was scrubbed...
Name: not available
URL: <https://stat.ethz.ch/pipermail/r-help/attachments/20130112/497e1ae6/attachment-0001.pl>

Hello

I want to draw a xyplot.
Its dots will have three colors: red for meat, green for vegetable,  
and
blue for both.

I used the code below but could not make the dot in the same group  
show the
same color.
Please kindly advise how to modify it.
I'm rather amazed you got anything. You are using base graphics  
arguments with a lattice function. There is some overlap but there are  
special functions like `trellis.par.set` and `trellis.par.get`.

Please read :

?lattice

Then read:

  ?xyplot

You need a lot of mental rearrangements to convert from base graphics  
to lattice graphics.
David.

> Thank you.
>
> code
>
> library (lattice)
> diet.code <- c("Herbivore", "Omnivore", "Carnivore")
>    Diet.colors <- c("forestgreen", "darkblue","red2")
>    levels(dataN$Diet) <- diet.code
>
>  # graph
>    par(mai=c(1.03,1.03,0.4,0.4))
>    par(new=T)
>
>    xyplot(GE_distance~Diet, data=dataN,
>    xlab=list("Diet  of  Breeding  Ground", cex = 1.4),
>    ylab=list("Migration  Distance",cex = 1.4),
>    xaxt="n",
>    yaxt="n",type="p",
>    lwd=1.5,
>    cex.lab=1.4, cex.axis=1.2,
>    font.axis=2,
>    cex=1.5,
>    las=1,
>    bty="l",
>    col=rep(Diet.colors))
>
> 	[[alternative HTML version deleted]]
>
> ______________________________________________
> R-help at 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.

David Winsemius, MD
Alameda, CA, USA