How about something like this?

mydata <- matrix(runif(180), ncol=9)
mydata <- as.data.frame(mydata)
mydata$V10 <- rnorm(20, 50, 10)
mydata$GROUP <- as.factor(rep(c("G1","G2"), c(10,10)))

par(mfrow=c(2,5))

for(i in 1:10){
boxplot(mydata[,i] ~ mydata$GROUP, main=names(mydata)[i])
}

hope it helps,

Chuck Cleland

Christoph Lehmann wrote:
many thanks for your great tip. I didn't know reshape.

Unfortunately in my real data, the values of my variables are ont all within the same range. Therefore, what shall I change in the code to get for each plot a scale, which is adjusted to the range of my variable?

thanks a lot

christoph

Chuck Cleland wrote:

Your variables (var.*) seem to be on the same scale. How about reshaping the data into a univariate layout and then using bwplot as follows:

mydata <- data.frame(ID = 1:20, A = runif(20), B = runif(20),
                     C = runif(20), GROUP = rep(c(0,1), c(10,10)))

mydata.uni <- reshape(mydata, varying = list(c("A", "B", "C")),
                      v.names = "Y", timevar = "VAR", times = c("A",
                      "B", "C"), direction = "long")

library(lattice)

bwplot(Y ~ as.factor(GROUP) | VAR, data = mydata.uni, layout=c(3,1,1),
       xlab="Group")

hope this helps,

Chuck Cleland

Christoph Lehmann wrote:

Hi
I have 10 variables and 2 groups. I know how to plot a bwplot for ONE var. e.g.


var.a var.b var.c .. GROUP
0.2   0.5   0.2   .. 0
0.3   0.2   0.2   .. 0
..
0.1   0.8   0.7   .. 1
0.5   0.5   0.1   .. 1
..


bwplot(var.a ~ GROUP, data = my.data)

How can I plot 10 bwplots (or boxplots) automatically into one graphic? is there any function from lattice which can do this?

thanks for a short hint

christoph

______________________________________________
[email protected] mailing list
https://stat.ethz.ch/mailman/listinfo/r-help
PLEASE do read the posting guide! http://www.R-project.org/posting-guide.html





-- Chuck Cleland, Ph.D. NDRI, Inc. 71 West 23rd Street, 8th floor New York, NY 10010 tel: (212) 845-4495 (Tu, Th) tel: (732) 452-1424 (M, W, F) fax: (917) 438-0894

______________________________________________
[email protected] mailing list
https://stat.ethz.ch/mailman/listinfo/r-help
PLEASE do read the posting guide! http://www.R-project.org/posting-guide.html

Reply via email to