如何更改条形图的来源？答案

【问题标题】：How to change the origin of a barplot?如何更改条形图的来源？
【发布时间】：2017-11-22 02:07:13
【问题描述】：

我有一个带有负值的 2 个数据集，所以 barplot 给了我一个带有条形图的图。如何将y轴的原点设置为负值，以获得向上的条形？

我有什么：

A <- c(-7.3, -2.17, 1.05)
B <- c(-3.69, -5.04, -0.746)
AB <- c(A, B)

barplot(AB, col = c("darkgray","darkgray","darkgray","lightgray","lightgray","lightgray"),#
  names.arg=c("A1", "A2", "A3", "B1", "B2", "B3"))
 legend("bottomright", legend = c("A", "B"), fill = c("darkgray", "lightgray"), horiz = T)

我想要什么：

【问题讨论】：

标签： r bar-chart axis axis-labels

【解决方案1】：

new <- abs(-8 - AB)

barplot(new, beside=TRUE, ylim=c(0, 12), yaxt="n",
    col = c("darkgray","darkgray","darkgray","lightgray","lightgray","lightgray"),#
    names.arg=c("A1", "A2", "A3", "B1", "B2", "B3"))

axis(2, seq(0, 12, 2), labels=seq(-8,4,2))
box(bty="l")
legend("topright", legend = c("A", "B"), fill = c("darkgray", "lightgray"), horiz = T)

【讨论】：