[R] [lattice] how to label panels with variable value (not name)?

Bert Gunter gunter.berton at gene.com
Sun Nov 18 19:01:44 CET 2012


Ken:

I would have thought so, too. However:

x <- 1:10; y <- runif(1:10); f <- factor(rep(1:2,5))
xyplot(y~x|f,  strip= function(which.panel,factor.levels,...){
      lab <- c("a","b")[which.panel]
      strip.default(factor.levels=lab,which.panel=which.panel,style=1,...)} )

produces label "a" for the first panel, but "NA" for the second. (see
sessionInfo() below).

This appears to be a bug to me; however, given lattice's maturity, I
am afraid it may well be user error -- in particular, my failure to
parse the Help correctly. Thoughts?
Incidentally, try using strip.custom() instead. I am so far completely
at a loss to understand what is happening there. Your insight would be
greatly appreciated.

R version 2.15.2 (2012-10-26)
Platform: i386-w64-mingw32/i386 (32-bit)

locale:
[1] LC_COLLATE=English_United States.1252  LC_CTYPE=English_United
States.1252
[3] LC_MONETARY=English_United States.1252 LC_NUMERIC=C
[5] LC_TIME=English_United States.1252

attached base packages:
 [1] datasets  splines   grid      tcltk     stats     graphics
grDevices utils     methods
[10] base

other attached packages:
[1] svSocket_0.9-51 lattice_0.19-26 MASS_7.3-22

loaded via a namespace (and not attached):
[1] cluster_1.14.3 Hmisc_3.10-1   R2HTML_2.2     svMisc_0.9-65
TinnR_1.0-5    tools_2.15.2
>


-- Bert

On Sun, Nov 18, 2012 at 8:09 AM, Ken Knoblauch <ken.knoblauch at inserm.fr> wrote:
> Tom Roche <Tom_Roche <at> pobox.com> writes:
>
>>
>>
>> As described @
>
> <<< clipped >>>
>
>>
>> However I will need to before-and-after compare this to
> the results of a
>> reboxing, or 3D regridding, of this data, so I would
>  prefer instead to
>> label each panel in the lattice with the _value_ of
>  the level (an
>> atmospheric pressure), rather than the name or
> index of the level.
>> How to do that?
>>
>> TIA, Tom Roche <Tom_Roche <at> pobox.com>
>
> maybe, see ?strip.custom in lattice
>
> --
> Ken Knoblauch
> Inserm U846
> Stem-cell and Brain Research Institute
> Department of Integrative Neurosciences
> 18 avenue du Doyen Lépine
> 69500 Bron
> France
> tel: +33 (0)4 72 91 34 77
> fax: +33 (0)4 72 91 34 61
> portable: +33 (0)6 84 10 64 10
> http://www.sbri.fr/members/kenneth-knoblauch.html
>
> ______________________________________________
> 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.



-- 

Bert Gunter
Genentech Nonclinical Biostatistics

Internal Contact Info:
Phone: 467-7374
Website:
http://pharmadevelopment.roche.com/index/pdb/pdb-functional-groups/pdb-biostatistics/pdb-ncb-home.htm




More information about the R-help mailing list