MomentEvaluate[mexpr,dist]
计算分布 dist 上的矩表达式 mexpr 的形式矩.
MomentEvaluate[mexpr,list]
计算数据 list 上的 mexpr 的形式矩和形式样本矩.
MomentEvaluate[mexpr,dist,list]
计算分布 dist 上的形式矩,以及数据 list 上的形式样本矩.
MomentEvaluate
MomentEvaluate[mexpr,dist]
计算分布 dist 上的矩表达式 mexpr 的形式矩.
MomentEvaluate[mexpr,list]
计算数据 list 上的 mexpr 的形式矩和形式样本矩.
MomentEvaluate[mexpr,dist,list]
计算分布 dist 上的形式矩,以及数据 list 上的形式样本矩.
更多信息
- 矩表达式是一个包含形式矩和形式样本矩的表达式.
- 形式矩是一个形式如下的表达式:
-
Moment[r] 形式 r
阶矩CentralMoment[r] 形式 r
阶中心矩FactorialMoment[r] 形式 r
阶阶乘矩Cumulant[r] 形式 r
阶累积量 - 形式样本矩是一个形式如下所示的表达式:
-
PowerSymmetricPolynomial[r] 形式 r
阶幂对称多项式AugmentedSymmetricPolynomial[{r1,r2,…}] 形式 {r1,r2,…} 增广对称多项式 - 对于一个样本矩表达式,PowerSymmetricPolynomial[0] 用作数据列表的长度.
- MomentEvaluate[mexpr,…,n] 假设 n 用作数据列表的长度.
范例
打开所有单元 关闭所有单元基本范例 (3)
MomentEvaluate[Moment[1], NormalDistribution[μ, σ]]MomentEvaluate[Moment[2], NormalDistribution[μ, σ]]MomentEvaluate[Moment[{1, 0}], BinormalDistribution[{Subscript[μ, 1], Subscript[μ, 2]}, {Subscript[σ, 1], Subscript[σ, 2]}, ρ]]MomentEvaluate[Moment[{1, 1}], BinormalDistribution[{Subscript[μ, 1], Subscript[μ, 2]}, {Subscript[σ, 1], Subscript[σ, 2]}, ρ]]MomentEvaluate[PowerSymmetricPolynomial[2], {a, b, c}]MomentEvaluate[AugmentedSymmetricPolynomial[{2, 1}], {a, b, c}]MomentEvaluate[Cumulant[3], {a, b, c}]范围 (6)
MomentEvaluate[Cumulant[2] + Moment[1] ^ 2, BinomialDistribution[n, p]]MomentEvaluate[Moment[{2, 2}] ^ 2 + Moment[{3, 1}], BinormalDistribution[ρ]]data = RandomVariate[BetaDistribution[2, 3], 10];MomentEvaluate[Cumulant[4] + Moment[2] ^ 2, data]Cumulant[data, 4] + Moment[data, 2] ^ 2MomentEvaluate[PowerSymmetricPolynomial[3], {a, b, c}]MomentEvaluate[AugmentedSymmetricPolynomial[{2, 1}], {a, b, c}]MomentEvaluate[PowerSymmetricPolynomial[{2, 3}], {{Subscript[x, 1], Subscript[x, 2]}, {Subscript[y, 1], Subscript[y, 2]}, {Subscript[z, 1], Subscript[z, 2]}}]MomentEvaluate[AugmentedSymmetricPolynomial[{{1, 2}, {3, 4}}], {{Subscript[x, 1], Subscript[x, 2]}, {Subscript[y, 1], Subscript[y, 2]}, {Subscript[z, 1], Subscript[z, 2]}}]MomentEvaluate[(PowerSymmetricPolynomial[4]/n), {Subscript[x, 1], Subscript[x, 2], Subscript[x, 3]}, n]se = MomentConvert[Moment[2], "SampleEstimator"] - Moment[2]data = RandomVariate[ExponentialDistribution[1], 10 ^ 5];MomentEvaluate[se, ExponentialDistribution[1], data]Moment[data, 2] - Moment[ExponentialDistribution[1], 2]推广和延伸 (1)
计算均值、方差、偏度和峰度,并使用 Cumulant 表示:
MomentEvaluate[{Cumulant[1], Cumulant[2], (Cumulant[3]/Cumulant[2]^3 / 2), 3 + (Cumulant[4]/Cumulant[2]^2)}, BinomialDistribution[n, p]]Table[f[BinomialDistribution[n, p]], {f, {Mean, Variance, Skewness, Kurtosis}}]% == %%//Simplify应用 (2)
sampleEst = (PowerSymmetricPolynomial[1]/PowerSymmetricPolynomial[0])(1 - (PowerSymmetricPolynomial[1]/PowerSymmetricPolynomial[0]));formalExp = MomentConvert[sampleEst, {Moment, n}]estMean = MomentEvaluate[formalExp, BernoulliDistribution[p]]//FactorestVar = MomentEvaluate[MomentConvert[(sampleEst - estMean) ^ 2, {Moment, n}], BernoulliDistribution[p]]//Factor(se = MomentConvert[Cumulant[4], "SampleEstimator"])//TraditionalForm(ue = MomentConvert[Cumulant[4], "UnbiasedEstimator", "PowerSymmetricPolynomial"])//TraditionalFormdist = ErlangDistribution[2, 3];data = RandomVariate[dist, {2500, 10 ^ 2}];ses = Table[MomentEvaluate[se, li], {li, data}];ues = Table[MomentEvaluate[ue, li], {li, data}];PairedHistogram[ses, ues, {0, 1, 0.05}, "PDF", ChartLabels -> {"Biased", "Unbiased"}]{Mean[ses], Mean[ues], Cumulant[dist, 4]}//Nsem = MomentEvaluate[MomentConvert[se, {Cumulant, n}], dist]uem = MomentEvaluate[MomentConvert[ue, {Cumulant, n}], dist]sev = MomentEvaluate[MomentConvert[(se - sem) ^ 2, {Cumulant, n}], dist]uev = MomentEvaluate[MomentConvert[(ue - uem) ^ 2, {Cumulant, n}], dist]{sev, uev} /. n -> Last[Dimensions[data]]//N{Variance[ses], Variance[ues]}属性和关系 (1)
MomentEvaluate 实际通过计算各组分来计算一个矩表达式:
dist = BinomialDistribution[n, p];MomentEvaluate[Moment[2] + Moment[1] ^ 2, dist]Moment[dist, 2] + Moment[dist, 1] ^ 2% == %%//Simplify相关指南
-
▪
- 统计矩与母函数
文本
Wolfram Research (2010),MomentEvaluate,Wolfram 语言函数,https://reference.wolfram.com/language/ref/MomentEvaluate.html.
CMS
Wolfram 语言. 2010. "MomentEvaluate." Wolfram 语言与系统参考资料中心. Wolfram Research. https://reference.wolfram.com/language/ref/MomentEvaluate.html.
APA
Wolfram 语言. (2010). MomentEvaluate. Wolfram 语言与系统参考资料中心. 追溯自 https://reference.wolfram.com/language/ref/MomentEvaluate.html 年
BibTeX
@misc{reference.wolfram_2026_momentevaluate, author="Wolfram Research", title="{MomentEvaluate}", year="2010", howpublished="\url{https://reference.wolfram.com/language/ref/MomentEvaluate.html}", note=[Accessed: 06-November-2026]}
BibLaTeX
@online{reference.wolfram_2026_momentevaluate, organization={Wolfram Research}, title={MomentEvaluate}, year={2010}, url={https://reference.wolfram.com/language/ref/MomentEvaluate.html}, note=[Accessed: 06-November-2026]}