All, Consider:
BagA <- c(-1000,10,10,10,10,10,10,
10,20,20,20,20,20,20,30,
30,40,40,50,60)
BagB <- c(10,20,30,30,40,40,50,50,
50,50,50,50,60,60,60,60,
60,60,60,1000)
layout(c(2,1))
barplot(table(BagB))
barplot(table(BagA))
At this point, I'd like to arrange the plots so that the 10-bars are
aligned, the 20-bars are aligned, etc. So, I started thinking, how do I
add an entry to a table? I tried:
tmp <- table(BagA)
tmp[8] <- 0
names(tmp)[8] <- "1000"
barplot(tmp)
But I got this error:
Try using t(tmp) when plotting. When you started mucking with that
table-object, it got converted (effectively) to a one row matrix (even
though it retained it "table"-class attribute) and you need to make it a
one column matrix to get the desired results with barplot().
tmpB <- table(BagB)
tmpB <- c(0, tmpB)
names(tmpB) <- c(-1000, names(table(BagB)) )
barplot( t(tmpB) )
barplot( t(tmp) )