Maybe you want something like: x<-rnorm(1000) hist(x, breaks=100, col=ifelse(abs((hist(x, breaks=100, main=""))$breaks) < 1.669, 4,2)) see also the density argument in ?hist Stefano> -----Messaggio originale----- > Da: Martin Olivier [mailto:martinol at ensam.inra.fr] > Inviato: venerd?? 7 maggio 2004 14.40 > A: r-help > Oggetto: [R] help with histogram > > > Hi all, > > I need some help with the function histogram. Let x be a vector. > The command hist(x,col="blue") gives an histogram for the vector x. > I would like to add some colors in the graphics such that the > histogram is > red if abs(x)>1.669 and blue otherwise...and what is the > solution if I > want to > change the filling instead of the color > > Thanks for your help, > Olivier > > ______________________________________________ > R-help at stat.math.ethz.ch mailing list > https://www.stat.math.ethz.ch/mailman/listinfo/r-help > PLEASE do read the posting guide! > http://www.R-project.org/posting-guide.html >
>>>>> "Guazzetti" == Guazzetti Stefano <Stefano.Guazzetti at ausl.re.it> >>>>> on Fri, 7 May 2004 14:45:22 +0200 writes:Guazzetti> Maybe you want something like: Guazzetti> x<-rnorm(1000) Guazzetti> hist(x, breaks=100, Guazzetti> col=ifelse(abs((hist(x, breaks=100, main=""))$breaks) < 1.669, Guazzetti> 4,2)) Guazzetti> see also the density argument in ?hist very good! Even slightly better {not calling hist() twice} is x <- rnorm(1000) hx <- hist(x, breaks=100,plot=FALSE) plot(hx, col=ifelse(abs(hx$breaks) < 1.669, 4, 2)) Regards, Martin