辅助轴的Abline剪辑

Question

使用 ablineclip(h = 2, x1 = 0,x2 = 5,lty = 2, col = "green") 我可以画一条直线到任何情节，如：

[{store_name: 'Target', count: 10}, {store_name: 'Walmart', count: 20}, {store_name: 'Costco', count: 5}]

这绘制了一条水平线，其中y = 2，从x = 0到x = 5。

如何为第二个y轴画一条线？ （表示右轴y值为2的水平线）。

我还没有代码，抱歉非生殖代码。

Answer 1

以下内容将起作用：

library(plotrix)
plot(1, type="n", xlim=c(-10,10), ylim=c(0,4))
ablineclip(h = 2, x1 = 0,x2 = 5,lty = 2, col = "green")
par(new=TRUE)
plot(1, type="n", xlim=c(-10,10), ylim=c(10,15), xaxt="n",yaxt="n",xlab="",ylab="")
axis(4)
ablineclip(h = 12, x1 = -4,x2 = 4,lty = 2, col = "red")