# [R] two questions re: the use of lattice (Q1 SOLVED, not Q2)

Bert Gunter gunter.berton at gene.com
Mon Jul 23 07:05:14 CEST 2012

```There's a typo below. It's Deepayan Sarkar.

-- Bert

On Sun, Jul 22, 2012 at 9:55 PM, Bert Gunter <bgunter at gene.com> wrote:
> inline.
>
> -- Bert
>
> On Sun, Jul 22, 2012 at 8:26 PM, Ranjan Maitra
> <maitra.mbox.ignored at inbox.com> wrote:
>>
>>> Just reset the levels of z\$sigma (and also redefine sigmaExpr):
>>>
>>>    z\$sigma <- factor(z\$sigma,
>>>                    levels = c(5,10,20,30,50))  # new levels order
>>>
>>>    sigmaExprList <- lapply(as.numeric(levels(z\$sigma)),
>>>                            function(s) bquote(sigma == .(s)))
>>>    sigmaExpr <- as.expression(sigmaExprList)
>>>    INUExpr <- paste0("INU = ", c(0,20,40), "%")
>>>
>>>    p <- bwplot(Error ~ Method | sigma + INU, data = z,
>>>           scales = list(rot=90), horiz = FALSE,
>>>           layout = c(5,3), col = "red")
>>>
>>>    useOuterStrips(p,
>>>       strip = strip.custom(
>>>            factor.levels = sigmaExpr),
>>>       strip.left = strip.custom(
>>>            factor.levels = INUExpr)
>>>    )
>>>
>>
>> One last question: how do I draw a line h = 0, lty =2 through each plot?
>
> ?panel.abline
>
> If you don't know how to use this in a panel function, time to start
> doing your own "homework." Panel functions are central to the trellis
> paradigm, so an honest effort to learn these details will be worth the
> effort. A good place to start is the examples in the above help file.
> There are also numerous online tutorials and websites. Google. Also
> check Seepyan Sarkar's (lattice's author) web page.
>
> -- Bert
>>
>> Thanks a lot, this has been quite a learning experience for me wrt
>> lattice!
>>
>> Ranjan
>>
>> ____________________________________________________________
>> GET FREE 5GB EMAIL - Check out spam free email with many cool features!
>> Visit http://www.inbox.com/email to find out more!
>>
>> ______________________________________________
>> R-help at r-project.org mailing list
>> https://stat.ethz.ch/mailman/listinfo/r-help
>> and provide commented, minimal, self-contained, reproducible code.
>
>
>
> --
>
> Bert Gunter
> Genentech Nonclinical Biostatistics
>
> Internal Contact Info:
> Phone: 467-7374
> Website:

--

Bert Gunter
Genentech Nonclinical Biostatistics

Internal Contact Info:
Phone: 467-7374
Website: