R语言绘图中Y轴数值展示异常问题咨询

现有如下数据框df：

df
   Xvariable  Yvariable
4         P1  1177
5         P2  3127
6         P3  1426
7         P4  2291
8         P5  2404
9         P6  2857
10        P7  1347

想要绘制Yvariable与Xvariable的柱状图，执行了以下代码：

plot(df[, "BB"], xaxt="n", type="h", lwd=60, yaxs="i", col=palette("R3"), lend=2, ylim = c(0, 3500)),

生成的图表中，代表数值3127的红色条形接近3500，代表1177的黑色条形超过了1500，与实际数值不符。

核心问题1：列名错误 #

你代码中使用的df[, "BB"]是不存在的列，你的数据框只有Xvariable和Yvariable两列，这会导致你要么调用了错误的数据（如果环境中存在其他BB对象），要么直接报错，这是数值不符的关键原因。必须将列名修正为Yvariable。

核心问题2：绘图方式与参数设置导致视觉偏差 #

1. type="h"绘制的是垂线图，并非标准柱状图，且你未手动设置x轴位置，默认使用数据框的行索引（4-10），导致条形间距和定位不合理。
2. lwd=60线宽过宽，加上lend=2（圆形线端点），会让垂线顶端向外延伸线宽的一半，视觉上的高度远大于实际y值。

解决方案 #

方案1：使用专门的柱状图函数barplot()（推荐）

barplot()是R中绘制柱状图的标准函数，自动处理x轴标签和条形布局：

barplot(df$Yvariable, 
        names.arg = df$Xvariable,  # 设置x轴标签为P1-P7
        col = palette("R3"), 
        ylim = c(0, 3500), 
        yaxs = "i", 
        border = NA)  # 可选：去掉条形边框，更美观

方案2：修正plot(type="h")的参数

如果坚持使用垂线图，需手动设置x轴位置，调整线宽和端点样式：

# 用1-7作为x轴位置，对应7个类别
plot(1:nrow(df), df$Yvariable, 
     xaxt="n", 
     type="h", 
     lwd=10,  # 减小线宽，避免视觉膨胀
     yaxs="i", 
     col=palette("R3"), 
     lend=1,  # 使用方形端点，消除顶端延伸
     ylim = c(0, 3500))
# 添加x轴标签
axis(1, at=1:nrow(df), labels=df$Xvariable)

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