r - 使用三列的条形图

Question

表中数据如下:

  Year  NSW Vic.  Qld   SA   WA Tas.  NT ACT Aust.
1 1917 1904 1409  683  440  306  193   5   3  4941
2 1927 2402 1727  873  565  392  211   4   8  6182
3 1937 2693 1853  993  589  457  233   6  11  6836
4 1947 2985 2055 1106  646  502  257  11  17  7579
5 1957 3625 2656 1413  873  688  326  21  38  9640
6 1967 4295 3274 1700 1110  879  375  62 103 11799
7 1977 5002 3837 2130 1286 1204  415 104 214 14192
8 1987 5617 4210 2675 1393 1496  449 158 265 16264
9 1997 6274 4605 3401 1480 1798  474 187 310 18532

我想绘制一个图表，其中 x 轴为(年份)，Y 轴为(总值)。条形图应描绘相应(年)的 ACT 和 NT 值。

我尝试了以下命令:

barplot(as.matrix(r_data$ACT, r_data$NT), main="r_data", ylab="Total", beside=TRUE)

上面的命令显示了每年 ACT 列的条形图，但没有显示 NT 列的条形图。

Answer 1

您必须以不同的方式创建矩阵:

barplot(as.matrix(r_data[c("ACT", "NT")]), 
        main="r_data", ylab="Total", beside=TRUE)

您还可以使用 cbind 代替 as.matrix 并保留原始方法的其余部分:

barplot(cbind(r_data$ACT, r_data$NT), 
        main="r_data", ylab="Total", beside=TRUE)