[R] Histogram with two colors depending on condition

Greg Snow Greg.Snow at imail.org
Thu Jul 17 17:19:57 CEST 2008


Here are a couple of ways:

> dat<-rnorm(1000,1,2)
> hist(dat, col='red')
> tmp <- par('usr')
> clip(0,tmp[2],tmp[3],tmp[4])
> hist(dat, col='green', add=TRUE)
>
> # or
>
> library(TeachingDemos)
> hist(dat, col='red')
> clipplot( hist(dat, col='green', add=TRUE), c(0, par('usr')[2]) )
>

Hope this helps,

--
Gregory (Greg) L. Snow Ph.D.
Statistical Data Center
Intermountain Healthcare
greg.snow at imail.org
(801) 408-8111



> -----Original Message-----
> From: r-help-bounces at r-project.org
> [mailto:r-help-bounces at r-project.org] On Behalf Of Mohammad
> Ehsanul Karim
> Sent: Thursday, July 17, 2008 3:13 AM
> To: r-help at r-project.org
> Subject: [R] Histogram with two colors depending on condition
>
> Dear List,
>
> Say, we generate data like this-
>
> dat<-rnorm(1000,1,2)
> hist(dat)
>
> How do i make the histogram, say, red (col = 2) before X =
> dat = 0, and rest say, green (col = 3) beyond X = dat = 0 in R?
>
> The resulting histogram could be like this
> http://ehsan.karim.googlepages.com/histogram.JPG (edited)
>
> Thanks in advance.
>
> Ehsan
> http://ehsan.karim.googlepages.com/diaryofastatistician
>
> ______________________________________________
> R-help at 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.
>



More information about the R-help mailing list