I'm using by() to call pairs(), and would like to put the factor
level into the title. A toy example would be something like:
> d1 <- data.frame(rnorm(100),rt(100,2),sin(1:100))
> levs <- as.factor(rep(1:5,20))
> levels(levs) <-
c("low","med-lo","med","med-hi","high")
> by(d1,levs,pairs)
Is there an elegant way to get "low"..."high" in the main
title for
each plot, without binding "levs" to the data sent to a custom plot
function? i.e. without something like...
my.pairs(data.frame(levs,d1)
where
my.pairs <- function(df,...) {
main.title <- unique(df[1])
pairs(df[-1],main=main.title)
}
which works, but bothers me.
Cheers
Jason
--
Indigo Industrial Controls Ltd.
64-21-343-545
jasont at indigoindustrial.co.nz
-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-
r-help mailing list -- Read http://www.ci.tuwien.ac.at/~hornik/R/R-FAQ.html
Send "info", "help", or "[un]subscribe"
(in the "body", not the subject !) To: r-help-request at
stat.math.ethz.ch
_._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._