Change the factor names of "var" in:
"y~x | var "

Tal



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


My contact information:
Tal Galili
E-mail: Tal.Galili@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 Wed, Nov 18, 2009 at 3:17 AM, ychu066 <ychu066@aucklanduni.ac.nz> wrote:

>
> Hi again, do you know how can I use the main function to change the title
> for
> eac h histogram. i.e that first graph show have a title "Index 1" but
> because the variable name column starts the 8th the title shows up as
> "Index
> 8" , i have tried use main = colnames(data)[i-1] but it result errors....
>
>
>
>
> Colin Millar wrote:
> >
> > 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@r-project.org [mailto:r-help-bounces@r-project.org]
> > On Behalf Of Tal Galili
> > Sent: 17 November 2009 12:15
> > To: ychu066
> > Cc: r-help@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@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@aucklanduni.ac.nz>
> > wrote:
> >
> >>
> >> tried but still doesnt work ...
> >>
> >> very weird ...
> >>
> >> ychu066 wrote:
> >> >
> >> > here is the codes that i tried.....
> >> >
> >> >> png(paste("hist",i,".png",sep="")
> >> > + library(lattice)
> >> > Error: unexpected symbol in:
> >> > "png(paste("hist",i,".png",sep="")
> >> > library"
> >> >> for(i in 8:153){
> >> > + histogram(~ data[,i] | data[,2],
> >> > data=data,ylab="Frequency",xlim=c(1,5),xlab="Score",ylim=c(0,100)))
> >> > Error: unexpected ')' in:
> >> > "for(i in 8:153){
> >> > histogram(~ data[,i] | data[,2],
> >> > data=data,ylab="Frequency",xlim=c(1,5),xlab="Score",ylim=c(0,100)))"
> >> >> }
> >> > Error: unexpected '}' in "}"
> >> >> dev.off()
> >> > Error in dev.off() : cannot shut down device 1 (the null device)
> >> >
> >> >
> >> > ychu066 wrote:
> >> >>
> >> >> still doesnt work ...
> >> >>
> >> >>
> >> >> Karl Ove Hufthammer wrote:
> >> >>>
> >> >>> On Thu, 12 Nov 2009 19:10:52 -0800 (PST) ychu066 <ychu066
> >> >>> @aucklanduni.ac.nz> wrote:
> >> >>>> And I also want to save each histogram in each separate pdf file
> > using
> >> >>>> the
> >> >>>> following codes ?.
> >> >>>> png("hist.png[i]")
> >> >>>> dev.off()
> >> >>>
> >> >>> Try png(paste("hist",i,".png",sep="") instead.
> >> >>>
> >> >>> --
> >> >>> Karl Ove Hufthammer
> >> >>>
> >> >>> ______________________________________________
> >> >>> R-help@r-project.org mailing list
> >> >>> https://stat.ethz.ch/mailman/listinfo/r-help
> >> >>> PLEASE do read the posting guide
> >> >>> http://www.R-project.org/posting-guide.html
> >> >>> and provide commented, minimal, self-contained, reproducible code.
> >> >>>
> >> >>>
> >> >>
> >> >>
> >> >
> >> >
> >>
> >> --
> >> View this message in context:
> >>
> > http://old.nabble.com/Plotting-Histogram-using-histogram%28%29-and-for-l
> > oop-and-I-want-to-save-the-histogram-individually-...-HELP-tp26328734p26
> > 384489.html
> >> Sent from the R help mailing list archive at Nabble.com.
> >>
> >> ______________________________________________
> >> R-help@r-project.org mailing list
> >> https://stat.ethz.ch/mailman/listinfo/r-help
> >> PLEASE do read the posting guide
> >> http://www.R-project.org/posting-guide.html
> >> and provide commented, minimal, self-contained, reproducible code.
> >>
> >
> >       [[alternative HTML version deleted]]
> >
> > ______________________________________________
> > R-help@r-project.org mailing list
> > https://stat.ethz.ch/mailman/listinfo/r-help
> > PLEASE do read the posting guide
> > http://www.R-project.org/posting-guide.html
> > and provide commented, minimal, self-contained, reproducible code.
> >
> > ______________________________________________________________________
> > This email has been scanned by the MessageLabs Email Security System.
> > For more information please visit http://www.messagelabs.com/email
> >
> > ______________________________________________
> > R-help@r-project.org mailing list
> > https://stat.ethz.ch/mailman/listinfo/r-help
> > PLEASE do read the posting guide
> > http://www.R-project.org/posting-guide.html
> > and provide commented, minimal, self-contained, reproducible code.
> >
> >
>
> --
> View this message in context:
> http://old.nabble.com/Plotting-Histogram-using-histogram%28%29-and-for-loop-and-I-want-to-save-the-histogram-individually-...-HELP-tp26328734p26400101.html
> Sent from the R help mailing list archive at Nabble.com.
>
> ______________________________________________
> R-help@r-project.org mailing list
> https://stat.ethz.ch/mailman/listinfo/r-help
> PLEASE do read the posting guide
> http://www.R-project.org/posting-guide.html
> and provide commented, minimal, self-contained, reproducible code.
>

	[[alternative HTML version deleted]]


