Try somelike this library(ggplot2) dow <- data.frame(dayofweek = factor(1:7), p = runif(7), w = c(0, 1, 1, 1, 1, 1, 0)) sc <- scale_fill_continuous() sc$legend <- FALSE qplot(dayofweek, p, data=dow, geom="bar", xlab="Day", ylab="Arrival Rate", main="Spam by Weekday", fill=w) + sc
HTH, Thierry ------------------------------------------------------------------------ ---- ir. Thierry Onkelinx Instituut voor natuur- en bosonderzoek / Research Institute for Nature and Forest Cel biometrie, methodologie en kwaliteitszorg / Section biometrics, methodology and quality assurance Gaverstraat 4 9500 Geraardsbergen Belgium tel. + 32 54/436 185 [EMAIL PROTECTED] www.inbo.be Do not put your faith in what statistics say until you have carefully considered what they do not say. ~William W. Watt A statistical analysis, properly conducted, is a delicate dissection of uncertainties, a surgery of suppositions. ~M.J.Moroney > -----Oorspronkelijk bericht----- > Van: [EMAIL PROTECTED] > [mailto:[EMAIL PROTECTED] Namens Christoph Krammer > Verzonden: maandag 8 oktober 2007 13:35 > Aan: r-help@r-project.org > Onderwerp: [R] How to remove legend? > > Hello, > > I want to do some simple bar plots on email arrival data, but > I do not quite get the point how to remove the legend. I use > the following code: > > > dow <- > read.csv(file="j:/uni_lernen/da_stockspam/svn/data/c411_weekday.txt", > header=TRUE) > > dow$dayofweek <- factor(dow$dayofweek) days <- c("Sun", > "Mon", "Tue", > > "Wed","Thu", "Fri", "Sat") > > levels(dow$dayofweek) <- days > > dow > dayofweek c p w > 1 Sun 16477 0.1333 0 > 2 Mon 19384 0.1568 1 > 3 Tue 18638 0.1507 1 > 4 Wed 19747 0.1597 1 > 5 Thu 20709 0.1675 1 > 6 Fri 16412 0.1327 1 > 7 Sat 12283 0.0993 0 > > > qplot(dayofweek, p, data=dow, geom="bar", xlab="Day", ylab="Arrival > > Rate", > main="Spam by Weekday", fill=w) > > The idea of the w parameter is to give weekends a different > color. But when I do this, I always get a legend of "w" with > two entries for its two colors. > > How can I avoid this? > > Thanks and regards, > Christoph > > ______________________________________________ > 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. > ______________________________________________ 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.
