Skip to content
Prev 78429 / 398502 Next

output a sequence of plots

Something similar to this
(but I haven't tested)

mydf <- data.frame(xx=rnorm(100), yy=rnorm(100), zz=rnorm(100))

for (nm in names(mydf)) {

   fnm <- file.path('c:',paste(nm,'.emf',sep=''))
   cat('Creating histogram in file',fnm,'\n')
   win.metafile( filename=fnm)
   hist(mydf[[nm]])                                          # or 
hist(mydf[,nm])
   dev.off()

}

-Don
At 11:54 AM -0400 10/5/05, Paul E. Green wrote: