[R] Combine colors and shading lines

HBaize HBaize at buttecounty.net
Fri Jun 20 20:31:52 CEST 2008



Josh, 
Check into "add=TRUE" :-)

All you need to do is insert "add=TRUE" to the second 
chart to superimpose it on the first chart. You might also 
consider making the second bar a different shade of color 
rather than using shadding lines, then it would only be one 
plot. 

data(HairEyeColor)
a <- as.table( apply(HairEyeColor, c(1,2), sum) )
a1<-a[1:2,]

barplot(a1,
        type="n",
        col=c("red","red","blue","blue","purple","purple","green","green"),
        beside = TRUE )

barplot(a1,
col=1,
density=c(0,7,0,7,0,7,0,7),
        beside = TRUE, add=TRUE )



Josh Roofchop wrote:
> 
> Hi, basically I am trying to create a grouped bar graph with each group a
> different color and a bar in each group to have shading lines.  Basically
> combine the 2 graphs created below.
> Thanks,
> Josh
> 
> data(HairEyeColor)
> a <- as.table( apply(HairEyeColor, c(1,2), sum) )
> a1<-a[1:2,]
> 
> par(mfcol=c(1,2), bg="white")
> 
> barplot(a1, 
> 	type="n",
> 	col=c(2,2,4,4,6,6,3,3),
>         beside = TRUE, )
> 
> barplot(a1, 
> col=1,
> density=c(0,7,0,7,0,7,0,7),
>         beside = TRUE, )
> 
>  http://www.nabble.com/file/p18033630/graph.JPG graph.JPG 
> 

-- 
View this message in context: http://www.nabble.com/Combine-colors-and-shading-lines-tp18033630p18035111.html
Sent from the R help mailing list archive at Nabble.com.



More information about the R-help mailing list