pdf - 在Mathematica中作为PDF插值函数

我想将函数的内插法用作PDF，并能够使用均值，概率，CDF等工具。我做了以下事情:

 f = Interpolation[data];
 dist = ProbabilityDistribution[f[x], {x,0,1000}];

例如，当我尝试:

Mean[dist] //N

它只是返回输入。与其他功能相同。

最佳答案

您可以使用离散分布:

data = {1, 2, 1, 3, 4};
data = data/Total@data;
f = Interpolation[data];
dist = ProbabilityDistribution[f[x], {x, 1, 5, 1}];
Mean[dist] // N

关于pdf - 在Mathematica中作为PDF插值函数，我们在Stack Overflow上找到一个类似的问题：https://stackoverflow.com/questions/10176544/