Skip to content
Prev 157073 / 398506 Next

lattice xyplot symbols instead of colors and legend matching plot symbols or colors

On Wed, Sep 24, 2008 at 12:30 PM, stephen sefick <ssefick at gmail.com> wrote:
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