R：在条形图上添加垂直线

Question

mydat <- c(rep(4:10, each = 3), rep(1:2, each = 2))
barplot(table(mydat))
abline(v = 3, col = "blue")

这给了我以下情节： 我想要在x=3处有一条垂直线。但是，由于x轴的间隔方式，垂直线似乎不在正确的位置。我怎样才能解决这个问题？即我希望我的情节看起来像这样：

Answer 1

要在第2条和第3条之间绘制一条线，请指定app.config的返回值，然后在这些值的第2条和第3条的application.config值中进行绘制。

barplot