r语言barplot如何下标数字

您可以使用 `text()` 函数在每个条形上方添加数字标签。以下是一个简单的示例代码：

# 创建数据
data <- c(10, 25, 15, 30)
names <- c("A", "B", "C", "D")

# 绘制条形图
barplot(data, names.arg = names)

# 添加数字标签
text(x = 1:4, y = data+1, labels = data, col = "red")

在此示例中，`text()` 函数使用了以下参数：

- `x`：标签的 x 坐标，这里使用 `1:4` 表示每个条形的中心位置。
- `y`：标签的 y 坐标，这里使用 `data+1` 表示标签位于每个条形的顶部。
- `labels`：要添加的标签，这里使用 `data` 表示每个条形的高度。
- `col`：标签的颜色，这里使用红色。