Plotting Histogram using histogram() and for loop and Iwant to save the histogram individually ... HELP

Or alternatively store as a list and export later if you want

... after some tidying ...

library(lattice)

columns <- 8:153
plots <- vector("list", length(columns)) 
j <- 0
for (i in columns)
{  
  plots[[ j <- j+1 ]] <- 
    histogram( ~ data[,i] | data[,2], 
      ylab = "Frequency", xlab = "Score", 
      xlim = c(1,5), ylim = c(0,100),
      main = colnames(data)[i]
    )
}

print(plots[[1]]) 

# or export

for (i in seq_along(plots))
{
  png(paste("hist", i, ".png", sep = ""))
  print(plots[[i]])
  dev.off()
}

HTH
Colin.

Incidentally, 

You put what you want to export between png(..) and dev.off()

If you supply the data explicitly it doesn't make any sense to pass the
data through the data argument.

No need for paste(x) if is x is already a character vector.

-----Original Message-----
From: r-help-bounces at r-project.org [mailto:r-help-bounces at r-project.org]
On Behalf Of Tal Galili
Sent: 17 November 2009 12:15
To: ychu066
Cc: r-help at r-project.org
Subject: Re: [R] Plotting Histogram using histogram() and for loop and
Iwant to save the histogram individually ... HELP

I know how you feel,
I came a cross the same problem once, which took sometime to find a
solution
for.

What you need to do is put the hist into a variable and then plot it,
for
example:

library(lattice)
for(i in 8:153){

hist.to.plot <- histogram(~ data[,i] | data[,2],
data=data,,ylab="Frequency",xlim=c(1,5),xlab="Score",ylim=c(0,100)),main
=paste(colnames(data)[i],sep="")
plot(hist.to.plot)
}

Cheers,
Tal

----------------------------------------------

My contact information:
Tal Galili
E-mail: Tal.Galili at gmail.com
Phone number: 972-52-7275845
FaceBook: Tal Galili
My Blogs:
http://www.talgalili.com (Web and general, Hebrew)
http://www.biostatistics.co.il (Statistics, Hebrew)
http://www.r-statistics.com/ (Statistics,R, English)

On Tue, Nov 17, 2009 at 7:09 AM, ychu066 <ychu066 at aucklanduni.ac.nz>
wrote:

Plotting Histogram using histogram() and for loop and Iwant to save the histogram individually ... HELP

Thread (12 messages)