Barplot - Can't figure it out

cxy <- c(x,y)
xy <- rep( c("x","y"), c(length(x),length(y)) )
( txy <- table(xy, cxy ) )

barplot( txy, beside=T )

-----Original Message-----
From: r-help-bounces at stat.math.ethz.ch 
[mailto:r-help-bounces at stat.math.ethz.ch] On Behalf Of T Petersen
Sent: Friday, February 18, 2005 1:01 PM
To: Petr Pikal
Cc: r-help at stat.math.ethz.ch
Subject: Re: [R] Barplot - Can't figure it out


Wow, I'm getting confused...The syntax Petr suggested does what I 
wanted, but things are stille wrong...Maybe a bug? Let me explain.

I got two vectors:

x = c(3, 3, 3, 4, 3, 4, 3, 4, 3, 4)

y = c(5, 2, 5, 5, 2, 2, 5, 5, 4, 2)

then I do the barplot you suggest

barplot(rbind(table(x), table(y)), beside=T)

but things are wrong(there is no bar for catagory "3") and I 
get an error message: Warning message: 
number of columns of result
        not a multiple of vector length (arg 1) in: 
rbind(table(Quest1), table(Quest2))

Any ideas?