Skip to content
Back to formatted view

Raw Message

Message-ID: <20120722222615.79806a91c4801409381d6341@inbox.com>
Date: 2012-07-23T03:26:15Z
From: Ranjan Maitra
Subject: two questions re: the use of lattice (Q1 SOLVED, not Q2)
In-Reply-To: <500CBFC7.9090507@ucalgary.ca>

> 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?

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!