如何在R语言基础绘图中为Y轴标签设置不同颜色？

嘿，这个需求我之前也碰到过！Base R的plot()函数确实没有现成的col.ylabels参数直接实现，但咱们可以用两步操作轻松搞定——先隐藏默认的Y轴标签，再手动添加带自定义颜色的标签。

下面是具体的代码示例，你可以直接套用：

# 第一步：绘制基础图形，隐藏默认的Y轴标签和刻度文本
plot(1:5, yaxt = "n", ylab = "")

# 定义Y轴的刻度位置、标签文本（这里用刻度值当标签，你可以换成自己的文本）
y_positions <- 1:5
label_texts <- y_positions
label_colors <- c("red","orange","yellow","green","blue")

# 第二步：添加Y轴刻度（不带默认标签）
axis(side = 2, at = y_positions, labels = FALSE)

# 第三步：逐个添加带颜色的标签
# par("usr")[1] 获取绘图区域最左侧的X坐标，减去0.2是为了让标签不贴在Y轴上
text(x = par("usr")[1] - 0.2,
     y = y_positions,
     labels = label_texts,
     col = label_colors,
     pos = 2)  # pos=2 强制标签在坐标点的左侧，对齐更整齐

小技巧说明： #

• 如果你的Y轴标签不是数字，比如是分类文本，只需要把label_texts换成你需要的内容就行，比如c("低","中","高","极高","爆表")
• 调整x = par("usr")[1] - 0.2里的0.2可以改变标签和Y轴的距离，根据你的图大小灵活调整
• pos=2可以保证标签始终在Y轴左侧，避免和图形内容重叠

内容的提问来源于stack exchange，提问作者adam.888