Whit Armstrong wrote: > Anyone know a quick way to color one bar of a histogram? > > I want to mark the bar in which the most recent observation falls. > > So, for instance: > > x <- rnorm(100) > latest.ob <- x[100] > hist(x) > ## how do I mark the bucket that latest.ob falls into? >
Something like this: x <- rnorm(100) (latest.ob <- x[100]) h <- hist(x) bin <- as.numeric(cut(latest.ob, h$breaks)) # need as.numeric for bin+1 lw <- h$breaks[bin] up <- h$breaks[bin+1] sz <- h$counts[bin] rect(lw,0,up,sz,col="red") -- O__ ---- Peter Dalgaard Øster Farimagsgade 5, Entr.B c/ /'_ --- Dept. of Biostatistics PO Box 2099, 1014 Cph. K (*) \(*) -- University of Copenhagen Denmark Ph: (+45) 35327918 ~~~~~~~~~~ - ([EMAIL PROTECTED]) FAX: (+45) 35327907 ______________________________________________ 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.
