Change the factor names of "var" in: "y~x | var " Tal
---------------------------------------------- My contact information: Tal Galili E-mail: tal.gal...@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 <ychu...@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-boun...@r-project.org [mailto:r-help-boun...@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.gal...@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 <ychu...@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]] ______________________________________________ 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.
