Я пытаюсь построить график с двумя пробелами, используя пакет plotrix. Моя проблема заключается в добавлении модификаций на сюжет после первого разрыва. Вот что я делал до сих пор:
x<-c(seq(1,20,1),100,200)
y<-runif(22)
gap.plot(x,y,gap=c(25,90,110,180), xlab='x',ylab='y',xtics=c(0,10,20,100,200),
ytics=seq(0,1,by=0.2),gap.axis='x', type='b')
abline(v=seq(25,27,.001), col='white')
axis.break(1,26,style='slash')
axis.break(3,26,style='slash')
Теперь я должен добавить некоторые модификации к графику:
abline(v=seq(110,112,.001), col='white')
axis.break(1,111,style='slash')
axis.break(3,111,style='slash')
rug(c(runif(50,0,20),105,106,108,190,195,198),col='red')
Я получаю следующий график:
Здесь есть 2 проблемы:
- конфигурация второго промежутка / разрыва не имела никакого эффекта. Я хочу, чтобы второй разрыв / разрыв выглядел точно так же, как первый;
- команда
rug не отображала значения после первого перерыва.
Это похоже на любой модификация, которую я делаю после первого разрыва, не работает. Любой намек, пожалуйста? Или это можно сделать с помощью ggplot, добавив красные пользовательские метки на оси X? Спасибо!