[R] Only one strip with italic font.

[Peter Ehlers]

On 2011-06-26 11:33, Kenneth Roy Cabrera Torres wrote:
> Hi R users:
>
> How can I obtain an italic font only
> for one of the two strips in a xyplot?
>
> library(lattice)
> t<-rep(seq(0,10,5),4)
> logCFU<-c(2,2.5,3,4,4.5,1.5,2,2.5,3,3.4,2,2.5)
> microorg<-factor(rep(c("E. coli","L. monocytogenes"),each=6))
> tratam<-factor(rep(c("t1","t2"),6))
> xyplot(logCFU~t|microorg+tratam,type="p",
> strip=strip.custom(par.strip.text=list(fontface=c("italic","bold"))))

Is this what you have in mind:

   myfonts <- c(2, 4)
   xyplot(logCFU ~ t | microorg + tratam,
     strip = function(..., which.given, par.strip.text)
       strip.default(...,
                     which.given = which.given,
                     par.strip.text = list(
                        font = myfonts[which.given])))

Peter Ehlers

>
> Thank you for your help.
>
> Kenneth
>
> ______________________________________________
> 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.