使用y轴断点向plotrix gap.plot（）添加箭头

Question

我尝试在存在y轴中断时使用plotrix包对gap.plot添加置信区间。这是一个MWE：

twogrp=c(rnorm(5)+4,rnorm(5)+20,rnorm(5)+5,rnorm(5)+22)

gap.plot(twogrp,gap=c(8,16),
  xlab="X values",ylab="Y values",xlim=c(1,30),ylim=c(0,25),
  main="Test two gap plot with the lot",xtics=seq(0,25,by=5),
  ytics=c(4,6,18,20,22,24),
  lty=c(rep(1,10),rep(2,10)),
  pch=c(rep(2,10),rep(3,10)),
  col=c(rep(2,10),rep(3,10)),
  type="b")
arrows(2,18,2,24,length=0.05,angle=90,code=3)

这并没有添加箭头，大概是因为上方的绘图区域已经关闭。

但这有效：

gap.plot(twogrp,gap=c(8,16),
  xlab="X values",ylab="Y values",xlim=c(1,30),ylim=c(0,25),
  main="Test two gap plot with the lot",xtics=seq(0,25,by=5),
  ytics=c(4,6,18,20,22,24),
  lty=c(rep(1,10),rep(2,10)),
  pch=c(rep(2,10),rep(3,10)),
  col=c(rep(2,10),rep(3,10)),
  type="b")
arrows(2,4,2,6,length=0.05,angle=90,code=3)

任何人都知道一个不涉及使用其他包的工作。我知道如何在ggplot2中执行此操作，我更喜欢使用plotrix。

Answer 1

将箭头放在上图区域时，需要从y值中减去间隙值。

arrows(2,18,2,24,length=0.05,angle=90,code=3)

应如下所示。

arrows(2,18 - 8,2,24 - 8,length=0.05,angle=90,code=3)