在r中使用堆积的条形图

Question

我试图在R中翻转叠加的条形图的顺序。

以下是使用mtcars数据集的示例。

#using mtcars, create a table
counts <- table(mtcars$vs, mtcars$gear)

#edit row names of table
row.names(counts)[1] <- "VS = 0"
row.names(counts)[2] <- "VS = 1"

#create barplot
barplot(counts, legend = row.names(counts))

我想翻转条形高度的顺序，以便VS = 1位于底部或VS = 0.X轴应保持排序为3,4,5。

Answer 1

只需翻转counts中的行的顺序：

foo <- counts[c(2,1),]
barplot(foo, legend = row.names(foo))

当然，底部条纹仍然颜色较深，因此也会翻转颜色编码。如果您想保留该值，请将col参数调整为barplot。

（编辑：经过@MrFlick好评后更新。）