R中直方图的正规高斯曲线

Question

我通过从文件中读取R中的二进制数据来创建直方图。我试图生成直方图值的正常Gaussian curve拟合，但我只能生成随每个点的直方图峰值变化的曲线。我很抱歉，如果这是一个非常基本的问题，但我只是R的新手。我也尝试在其他答案的帮助下生成它，但没有成功。我写了以下代码：

a <- file('binarydata','rb')
f <- readBin(a, double(), n=1000, size=4, endian='little')
h <- hist(f, breaks=10, plot=FALSE)
h$counts=h$counts/sum(h$counts)
plot(h, xlim=c(1,100), ylim(0,1))
lines(density(f), col="black")

Answer 1

线（密度（rnorm（1000，mean = mean（f），sd = sd（f））），col = 1，lwd = 3）