R语言matplot中高亮X轴特定点的技术咨询

我懂你想在matplot生成的折线图里，给X轴上的特定位置做醒目高亮的需求，其实有几种简单直接的方法能实现，下面给你逐一说明：

方法1：自定义特定刻度样式实现高亮 #

如果是想让某几个X轴刻度（比如第3和第7个位置）看起来更突出，可以分两次调用axis()函数：先画常规刻度，再用特殊样式覆盖目标刻度：

matplot(tafmc[,-5], type="l", lwd=2, xlab="Read Length", ylab= "Base frequency at each position", axes=F)
axis(2)
# 先绘制普通的X轴刻度
axis(side=1,at=1:12, col.axis="black")
# 单独高亮特定刻度，比如at=3和at=7，设置红色粗体+粗刻度线
axis(side=1,at=c(3,7), col.axis="red", lwd.tick=2, font=2)
legend(legend = colnames(tafmc)[-5],"topright",col=1:4, lty=1:4, lwd=2)

方法2：用线段或标记点高亮X轴位置 #

如果想在X轴对应位置画显眼的标记（比如红色垂线段或大圆点），可以用segments()或points()函数：

matplot(tafmc[,-5], type="l", lwd=2, xlab="Read Length", ylab= "Base frequency at each position", axes=F)
axis(2)
axis(side=1,at=1:12)
# 在X=5的位置画一条向上延伸的红色粗线段
segments(x0=5, y0=par("usr")[3], x1=5, y1=par("usr")[3]+0.05, col="red", lwd=3)
# 或者在X轴上画一个大红色圆点
points(x=5, y=par("usr")[3], pch=19, col="red", cex=1.5)
legend(legend = colnames(tafmc)[-5],"topright",col=1:4, lty=1:4, lwd=2)

这里par("usr")[3]是获取当前绘图区域的Y轴下限，确保标记刚好落在X轴上。

方法3：给X轴特定区域加背景高亮 #

如果想给某一段X轴范围（比如X=2到X=4）加背景色突出，可以用rect()函数：

matplot(tafmc[,-5], type="l", lwd=2, xlab="Read Length", ylab= "Base frequency at each position", axes=F)
# 先绘制背景矩形，要放在折线图之前绘制
rect(xleft=1.5, xright=4.5, ybottom=par("usr")[3], ytop=par("usr")[3]+0.02, col="yellow", border=NA)
axis(2)
axis(side=1,at=1:12)
legend(legend = colnames(tafmc)[-5],"topright",col=1:4, lty=1:4, lwd=2)

你可以根据自己的需求选对应的方法，调整颜色、大小这些参数就能达到理想的高亮效果～

内容的提问来源于stack exchange，提问作者Siddharth