[R] lattice xyplot symbols instead of colors and legend matching plot symbols or colors

[Deepayan Sarkar]

On Wed, Sep 24, 2008 at 12:30 PM, stephen sefick <ssefick at gmail.com> wrote:
> Deepayan I believe that I am dense- I am still having a problem
> getting it working.  I can not figure out how to use packet.number.

Something like (untested)

     panel=function(...){
           panel.xyplot(...)
           pn <- packet.number()
           if (pn == 1) panel.abline(lm(GPP~I(1/Iron), data=f))
           else if (pn == 2) panel.abline(lm(GPP~I(1/TSS), data=f))
           else panel.abline(lm(GPP~I(TIN.TP), data=f))
    }

-Deepayan

> On Wed, Sep 24, 2008 at 2:56 PM, Deepayan Sarkar
> <deepayan.sarkar at gmail.com> wrote:
>> On Wed, Sep 24, 2008 at 10:15 AM, stephen sefick <ssefick at gmail.com> wrote:
>>> I would like to use the data below where the plots are close to what I
>>> want.  Instead of color I would like to use different symbols, and
>>> have the symbols in the legend match the graphs.  I am also going to
>>
>> See ?simpleTheme
>>
>>> add a regression line to these I know about the type="r" (which is
>>> fine for these particular graphs) argument, but it fits the subsets
>>> instead of the entire data set-- should I use a list of regression
>>> fits in the order of the arguments in an abline panel to do this?
>>
>> See ?packet.number, or
>> http://www.r-project.org/conferences/useR-2007/program/presentations/sarkar.pdf
>> for more general approaches.
>>
>> -Deepayan
>>
>
>
>
> --
> Stephen Sefick
> Research Scientist
> Southeastern Natural Sciences Academy
>
> Let's not spend our time and resources thinking about things that are
> so little or so large that all they really do for us is puff us up and
> make us feel like gods. We are mammals, and have not exhausted the
> annoying little problems of being mammals.
>
>        -K. Mullis
>