要在R中将平均值添加到直方图,您可以使用以下步骤:
# 生成随机数据
set.seed(123)
data <- rnorm(1000)
# 创建直方图
hist(data, col = "lightblue", main = "Histogram with Mean", xlab = "Values", ylab = "Frequency")
# 计算平均值
mean_value <- mean(data)
# 在直方图上添加平均值
abline(v = mean_value, col = "red", lwd = 2, lty = 2)
text(x = mean_value, y = 0, label = "Mean", adj = c(0.5, 1.5), col = "red", cex = 0.8)
这将在直方图上添加一条红色虚线,表示数据的平均值,并在该线下方添加一个标签,显示平均值的数值。
完整代码如下:
# 生成数据并创建直方图
set.seed(123)
data <- rnorm(1000)
hist(data, col = "lightblue", main = "Histogram with Mean", xlab = "Values", ylab = "Frequency")
# 计算平均值并将其添加到直方图上
mean_value <- mean(data)
abline(v = mean_value, col = "red", lwd = 2, lty = 2)
text(x = mean_value, y = 0, label = "Mean", adj = c(0.5, 1.5), col = "red", cex = 0.8)
这段代码将生成一个带有平均值的直方图,并使用红色虚线和标签突出显示平均值。
领取专属 10元无门槛券
手把手带您无忧上云