我的正态曲线无法使用直方图正确绘制

Question

因此，我已经绘制了直方图和法线曲线，但是该曲线看起来比直方图条小得多。我做错了，它比应该的小很多？

您可以在我的代码中看到，我已经绘制了直方图，并尝试了两种绘制法线曲线的方法。我已经计算了数据集的标准差和均值，所以我只使用实际数字。线条确实会绘制，只是比它们应该的位置低得多。

g = read.csv("C:/Users/emkat/Documents/decave.txt",header=FALSE)

g

m <- lapply(g,mean)

std <- sqrt(var(g))

hist(g[,1],plot = TRUE)
x <- g[,1]

y <- dnorm(x,mean = 26.59138,sd = 5.046878)

curve(dnorm(x,mean = 26.59138,sd = 5.046878),col="darkblue",lwd=2,add = TRUE)

lines(density(g[,1]),col="blue")

Answer 1

直方图的Y轴显示每个仓中项目的频率。频率可以取任何值（甚至大于1）。但是，如果必须将直方图Y轴与概率密度的轴匹配，则必须添加参数“ freq = FALSE”。

例如，在下面的代码中，我使用了汽车数据集来演示使用命名参数“ freq =”的效果。

data_1 <- cars

## These settings are for plotting two curves side by side
par(mfrow=c(1,2))
## Without freq = FALSE
hist(data_1$dist,plot=TRUE,freq=TRUE)
lines(density(data_1$dist),col="red")

## With freq = FALSE
hist(data_1$dist,plot=TRUE,freq=FALSE)
lines(density(data_1$dist),col="blue")

生成的图像如下。左边是红色密度曲线，它很平坦，因为直方图的Y轴（大于15）太大而无法显示概率密度。右边是可见的蓝色曲线（由于“ freq = FALSE”选项）。

我希望这会有所帮助。如果问题仍然存在，请告诉我们。