在gmapplot2的条形图旁边

Question

R中的基本图表功能使用beside标记生成带有数据列并排的条形图变得相对简单。例如，这段代码：

test1 <- c(2,4)
test2 <- c(4,5)
data <- data.frame(test1, test2)
barplot(
    as.matrix(data), 
    cex.lab = 1.5, 
    cex.main = 1.4, 
    beside=TRUE
    )

制作此图表：

我想使用ggplot2生成类似的图表，但the geom_bar function does not have a beside flag。是否可以使用ggplot2生成类似的条形图？

Answer 1

试试这个：

library(reshape2)
data$ID <- as.factor(1:nrow(data))
ggplot(melt(data, id='ID'), aes(variable, value, fill=ID, group=ID)) + 
geom_bar(stat='identity', position='dodge')