R中是否有一个函数将曲线拟合到直方图？
假设你有下面的直方图
hist(c(rep(65, times=5), rep(25, times=5), rep(35, times=10), rep(45, times=4)))
看起来很正常，但有点歪.我想拟合一条倾斜的法线曲线，以环绕这个直方图.
这个问题很基本，但我似乎在网上找不到R的答案.
推荐答案
如果我正确理解了你的问题，那么你可能需要密度估计和直方图:
X <- c(rep(65, times=5), rep(25, times=5), rep(35, times=10), rep(45, times=4))
hist(X, prob=TRUE) # prob=TRUE for probabilities not counts
lines(density(X)) # add a density estimate with defaults
lines(density(X, adjust=2), lty="dotted") # add another "smoother" density
Edit a long while later:
下面是一个稍微打扮一下的版本:
X <- c(rep(65, times=5), rep(25, times=5), rep(35, times=10), rep(45, times=4))
hist(X, prob=TRUE, col="grey")# prob=TRUE for probabilities not counts
lines(density(X), col="blue", lwd=2) # add a density estimate with defaults
lines(density(X, adjust=2), lty="dotted", col="darkgreen", lwd=2)
以及它生成的图形:
R相关问答推荐
混淆矩阵，其中每列和等于1
在ggplot Likert条中添加水平线
查找具有平局的多个列的最大值并返回列名或平局 destruct 者NA值
无法将传奇添加到cowplot多情节中
R：更新后无法运行控制台
多重RHS固定估计
如何在emmeans中计算连续变量的对比度
在嵌套列表中查找元素路径的最佳方法
如何将R中数据帧中的任何Nas替换为最后4个值
使用带有OR条件的grepl过滤字符串
将重复项转换为NA
用约翰逊分布进行均值比较
DEN扩展包中的RECT树形图出现异常行为
具有重复元素的维恩图
更新R中的数据表(使用data.table)
'使用`purrr：：pwalk`从嵌套的嵌套框架中的列表列保存ggplots时出现未使用的参数错误
无法将条件case_when()应用于使用！！创建的新变量Mutations
R：如何在数据集中使用Apply
如果极点中存在部分匹配，则替换整个字符串
把代码写成dplyr中的group_by/摘要更简洁吗？
实用课程推荐