[R] Barplot - thanks
Muhammad Subianto
msubianto at gmail.com
Wed Aug 30 13:11:01 CEST 2006
Dear all,
Many Thanks to Jacques VESLOT and Jim Lemon for their helps.
Best, Muhammad Subianto
#Jacques VESLOT
barplot(t(sapply(split(z1[,1:8], z1$V9),colSums)), beside=T)
#Jim Lemon
barplot(sapply(z1[1:8],by,z1[9],sum),beside=TRUE)
On this day 30/08/2006 11:43, Muhammad Subianto wrote:
> Dear all,
> I have a dataset. I want to make barplot from this data.
> Zero1 <- "
> V1 V2 V3 V4 V5 V6 V7 V8 V9
> 1 1 0 0 0 1 0 0 0 Positive
> 2 0 0 1 0 1 0 1 1 Negative
> 3 0 0 1 0 0 0 1 1 Positive
> 4 0 1 0 1 1 1 0 1 Negative
> 5 0 0 1 0 1 1 0 0 Positive
> 6 0 1 0 0 1 1 1 1 Negative
> 7 1 0 1 1 1 1 1 1 Negative
> 8 0 0 0 0 1 0 0 1 Negative
> 9 0 1 1 1 1 0 0 1 Negative
> 10 0 0 0 1 1 0 1 0 Positive
> 11 0 0 0 0 1 0 0 1 Negative
> 12 0 0 1 1 1 1 1 0 Positive
> 13 0 1 1 0 1 1 1 1 Negative"
>
> z1 <- read.table(textConnection(Zero1), header=TRUE)
> z1
> str(z1)
>
> A simple way I can use mosaic plot
> mosaicplot(table(z1))
> library(vcd)
> mosaic(table(z1))
>
> I have tried to learn ?xtabs ?table and ?ftable but I can't figure out.
> I need a barplot for all variables and the result maybe like
>
> | | | |
> | | | | | | | | |
> |pos|neg| |pos|neg| |pos|neg|
> | | | | | | | | |
> --------- --------- ---------
> v1 v2 v3 .... v7 v8
>
> Thanks you for any helps.
> Regards, Muhammad Subianto
>
More information about the R-help
mailing list