如何将平均值添加到R中的直方图？

Question

我想绘制一个平均值(平均值)的直方图(例如我们可以用蓝色粗线标记).

我尝试使用plot命令来做,但即使我设置参数add=TRUE 它也不起作用.

Answer 1

您可以使用abline()向绘图添加线条:

x <- rnorm(100)
mx <- mean(x)
hist(x)
abline(v = mx, col = "blue", lwd = 2)

还要看一下?par图形参数(比如col和lwd).

通常,您还可以使用lines()以下方法绘制线条:

x <- rnorm(100, mean = 10)
mx <- mean(x)
hist(x)
lines(c(mx,mx), c(0,15), col = "red", lwd = 2)
lines(c(10, 11.5), c(0, 10), col = "steelblue", lwd = 3, lty = 22)
text(mx, 18 , round(mx, 2))
text(mx, 12 , "big", cex = 5)

where text()用于添加文本.该论点cex描述了"角色扩展因子".

另外,请查看Quick-R,了解使用R进行基本绘图的概述.

Answer 2

hist(data)
abline(v=mean(data),col="blue")

Answer 3

如果你有使用ggplot2包的更多列的数据框是我的首选选项:

ggplot (data, aes (x = colname)) + geom_vline(xintercept=mean(data$colname), color="red")

Colname是data.frame中的列,您可以为其绘制直方图和平均值.