Dear all, I´m trying to create multiple graphs on the same page, but they are all stacked on top of each other. My code: par(mfrow=c(2,2)) a<-list(levels(bar$h.r)[c(1,3,6)]) print(a) lapply(a,function(x){ a<-subset(bar,h.r==x) with(a,cdplot(wh~Age,ylab=x)) #plot.new() }) The plot.new command doesnt help... Any ideas?? //M