R语言绘制图表时如何在图例中输入自定义展示数值

你可以通过拼接数值和标签文本实现需求，修改后的完整可运行代码如下：

Test <- structure(list(Category = c("FDE", "FDE", "FDE", "FDE"), 
                       Days = c(4, 1, 6, 1), Numbers = c(7, 3, 2, 1)), row.names = c(NA, 4L), class = "data.frame")

# 坐标轴标签已翻译为中文
plot(Numbers ~ Days, xlab = "天数", ylab = "数值", xlim = c(0, 10), ylim = c(0, 10), data = Test)

xy <- unique(Test$Numbers)

points(0, xy, col = "red", pch = 19, cex = 2, xpd = TRUE)

# 调整图例参数，数值在前、标签在后
legend("bottomright",
       inset = c(0, 0),
       legend = paste0(round(xy, 1), " 对应样本数值"), # 可自行修改后方的标签文本
       col = "red",
       pch = 19,
       cex = 1.2)

调整说明：

• 调用paste0()函数将数值与自定义标签拼接，直接实现数值放在标签前方的展示效果
• 补充了图例的col、pch参数，和图中绘制的红色圆点样式保持匹配
• 已将坐标轴的英文标签翻译为中文，你也可以根据需求自行修改文本内容

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