Re: [S] Trellis strip and trellis.par.set

Jack Lewis (jlewis@imtsun.rsl.psw.fs.fed.us)
Fri, 24 Jul 1998 13:07:44 -0700


Hsu, Chyi-Hung wrote:

> Dose anyone know how to make the background of the trellis strip
> transparent? .....

The following function appeared on S-news awhile ago:

"trellis.strip"<-
function(b = 0, s = 0)
{
# Sets trellis parameters for strip colors
# Default will eliminate shading from trellis strips
# Use trellis.strip(5,12) for trellis defaults
if(is.null(attr(get(".Device", where = 0), "trellis.settings"))) stop(
"Current device is not a trellis device")
s.b <- trellis.par.get("strip.background")
s.b$col[1] <- b
trellis.par.set("strip.background", s.b)
s.s <- trellis.par.get("strip.shingle")
s.s$col[1] <- s
trellis.par.set("strip.shingle", s.s)
}

--
Jack Lewis                           Redwood Sciences Laboratory
707-825-2929 voice                   Pacific Southwest Research Station
707-825-2901 fax                     USDA Forest Service
jlewis/psw_rsl@fs.fed.us             http://www.rsl.psw.fs.fed.us

-------------------------------------------- Thought must be divided against itself before it can come to any knowledge of itself. (Aldous Huxley)

----------------------------------------------------------------------- This message was distributed by s-news@wubios.wustl.edu. To unsubscribe send e-mail to s-news-request@wubios.wustl.edu with the BODY of the message: unsubscribe s-news