将通用函数（特殊情况Power Law）拟合到R中的直方图

Question

如何将通用曲线拟合到R？

中的直方图

例如，在示例中：Fitting a density curve to a histogram in R它显示了如何使用ggplot密度估计，但我希望适合任何类型的曲线（更具体地说，在这种情况下我想要符合幂律，但是它可以是任何其他的，如x ^ 2）。

我如何将其与数据相符合：

hdat <- hist(c(rep(65, times=5), rep(25, times=5), rep(35, times=10), rep(45, times=4)))