我有一个数据集,其中包含一个比其他点高得多的点;我正在尝试使用gap.plot
在图表上显示这一点,而不会引入不必要的空白区域。但是,我的线条图跳过图表顶部面板中的点,使其保持隔离状态。
代码如下:
year<-c(2001:2015)
y<-c(30, 13, 0, 0, 0, 1, 5, 309, 7, 1, 58, 1, 62, 69, 49)
par(bty="n") #Deletes box
gap.plot(
year,y
, type="b"
, ylim=c(0,325)
, gap=c(100,275)
, gap.axis="y"
, xaxt = "n"
, xtics =NA
, xticlab=NA
, xlim =c(2001,2015)
, xlab="Year"
, ylab="Positive Samples"
, pch=15
)
axis(1,at=c(2001:2015))
abline(h=seq(100,103), col="white",lwd=5) #Eliminates horizontal lines
axis.break(axis=2,breakpos=100,style="slash")
我最终得到以下图表: 我做错了什么?