我有这个脚本，它采用all_data并将其设置为一个包含4行和4列的矩阵。然后，我将绘制数据作为条形图。问题是我想用4个元素对图中的条形图进行分组。换句话说，我想按行分组。一行由4个元素组成，我希望各列在一起。我怎么能用R做这个？我还希望每列都有一个x轴的刻度线，表示列的位置？这样，我知道具有0值的列在哪里。
all_data <- c(0, 75, 33, 195, 90, 0, 939, 240, 87, 931, 0, 200, 37, 186, 196, 0)
# Graph data as a bar plot, but gather the columns by a set of 4 elements
barplot(t(as.matrix(all_data, nrow=4, byrow=TRUE)), main=NULL, ylab= "Throughput (Mbps)", xlab="From:", ylim=c(0,1000), beside=TRUE, lwd=1:2, angle=c(45,135), density=seq(5,40,10), col=NA)
box()
grid(NA, 5, lwd=1,lty=5) # grid only in y-direction