在R中的Barplot中添加x轴

Question

对于R中的以下source：

barplot

问题1：如何在不增加钢筋宽度的情况下添加x轴？

Q2：如何使y轴的标题水平？

数据：

bp <- barplot(df$share.work, 
              names.arg=df
              space = c(0, diff(df$dist.km.work)),
              col="blue", 
              xlab="Kilometer", 
              ylab="Trip Frequency",
              ylim=c(0,.25), las=1 )

Answer 1

A1：您可以使用axis.lty=1添加x轴。

A2：注释掉ylab="Trip Frequency"。在barplot之后，使用
mtext(2, text = "Trip Frequency", line = 2, las = 1)。您可以通过更改line（水平）移动标题，也可以通过更改las旋转标题。

因此，代码变为

bp <- barplot(df$share.work, 
              names.arg=df,
              space = c(0, diff(df$dist.km.work)),
              col="blue", 
              xlab="Kilometer", 
              #ylab="Trip Frequency",
              ylim=c(0,.25),
              las=1,
              axis.lty=1)

mtext(2, text = "Trip Frequency", line = 2, las = 1)