从顶部悬挂酒吧的条形图

Question

我有一个模拟的例子：

a<-seq(1:5)
barplot(a)

现在我希望从第3轴（最上面的一个）悬挂杆并且不从轴1上升（在任何图（a）函数中看到的正常x轴。（这可以用于任何其他情节，我猜想。）

我的想法是将降水数据悬挂在我的图表顶部，图表右侧有一个y轴。

我该怎么办？

感谢您的任何建议。

Answer 1

使用barplot(a, ylim = rev(range(c(0, a))))使图表从上到下。

您可以使用yaxt = "n"和axis()在右侧绘制轴。

barplot(a, ylim = rev(range(a)), yaxt = "n")
axis(4, at = a)

这是前一个例子的输出：