FactorialMoment[data,r]
data の r
次階乗モーメント
を与える.
FactorialMoment[data,{r1,…,rm}]
data の多変量{r1,…,rm}次階乗モーメント
を与える.
FactorialMoment[dist,…]
分布 dist の階乗モーメントを与える.
r
次の形式的階乗モーメントを表す.
FactorialMoment
FactorialMoment[data,r]
data の r
次階乗モーメント
を与える.
FactorialMoment[data,{r1,…,rm}]
data の多変量{r1,…,rm}次階乗モーメント
を与える.
FactorialMoment[dist,…]
分布 dist の階乗モーメントを与える.
r
次の形式的階乗モーメントを表す.
詳細
- 階乗モーメントは,
によって与えられるFactorialPower[x,r]を使って定義される. - 次数 r のスカラーで data が配列
のとき: -
![x in TemplateBox[{Vectors, paclet:ref/Vectors}, RefLink, BaseStyle -> {3ColumnTableMod}][n] x in TemplateBox[{Vectors, paclet:ref/Vectors}, RefLink, BaseStyle -> {3ColumnTableMod}][n]](Files/FactorialMoment.ja/3.png)

r 次階乗ベキの和 » ![x in TemplateBox[{Matrices, paclet:ref/Matrices}, RefLink, BaseStyle -> {3ColumnTableMod}][{n,m}] x in TemplateBox[{Matrices, paclet:ref/Matrices}, RefLink, BaseStyle -> {3ColumnTableMod}][{n,m}]](Files/FactorialMoment.ja/4.png)

列ごとの r 次階乗ベキの和 » ![x in TemplateBox[{Arrays, paclet:ref/Arrays}, RefLink, BaseStyle -> {3ColumnTableMod}][{n_(1),...,n_(k)}] x in TemplateBox[{Arrays, paclet:ref/Arrays}, RefLink, BaseStyle -> {3ColumnTableMod}][{n_(1),...,n_(k)}]](Files/FactorialMoment.ja/5.png)

列ごとの r 次階乗ベキの和 » - FactorialMoment[x,r]はArrayReduce[FactorialMoment[#,r]&,x,1]に等しい.
- 次数{r1,…,rm}のベクトルで data が配列
のとき: -
![x in TemplateBox[{Matrices, paclet:ref/Matrices}, RefLink, BaseStyle -> {3ColumnTableMod}][{n,m}] x in TemplateBox[{Matrices, paclet:ref/Matrices}, RefLink, BaseStyle -> {3ColumnTableMod}][{n,m}]](Files/FactorialMoment.ja/6.png)

第 j 列の rj次階乗ベキの和 ![x in TemplateBox[{Arrays, paclet:ref/Arrays}, RefLink, BaseStyle -> {3ColumnTableMod}][{n_(1),...,n_(k)}] x in TemplateBox[{Arrays, paclet:ref/Arrays}, RefLink, BaseStyle -> {3ColumnTableMod}][{n_(1),...,n_(k)}]](Files/FactorialMoment.ja/7.png)

第 j 列の rj次階乗ベキの和 » - FactorialMoment[x,{r1,…,rm}]はArrayReduce[FactorialMoment[#,{r1,…,rm}]&,x,{{1},{2}}]に等しい.
- FactorialMomentは数値データと記号データの両方を扱うことができる.
- data は次の追加的な形式と解釈を持つことができる.
-
Association 値(キーは無視される) » WeightedData もとになっているEmpiricalDistributionに基づく加重平均 » EventData もとになっているSurvivalDistributionに基づく » TimeSeries, TemporalData, … 値のベクトルまたは配列(タイムスタンプは無視される) » Image,Image3D RGBチャンネル値またはグレースケール強度値 » Audio すべてのチャンネルの振幅値 » - 分布 dist についての r
次階乗モーメントは Expectation[x(r),xdist]で与えられる. » - 多変量分布 dist についての{r1,…,rm}
次階乗モーメントはExpectation[x1(r1)⋯ xm(rm),{x1,…,xm}dist]で与えられる. » - ランダム過程 proc については,階乗モーメント関数は時点 t におけるスライス分布SliceDistribution[proc,t]について,
[t]=FactorialMoment[SliceDistribution[proc,t],r]として計算できる. » - FactorialMoment[r]はMomentConvertやMomentEvaluate等の関数で使うことができる. »
例題
すべて開く すべて閉じる例 (2)
data = RandomVariate[PoissonDistribution[4], 10 ^ 4];FactorialMoment[data, 3]FactorialMoment[{Subscript[k, 1], Subscript[k, 2], Subscript[k, 3]}, 3]FactorialMoment[BinomialDistribution[n, p], 2]FactorialMoment[MultinomialDistribution[n, {Subscript[p, 1], Subscript[p, 2], Subscript[p, 3]}], {2, 2, 2}]スコープ (20)
基本的な用法 (5)
FactorialMoment[{1, 2, 3, 4}, 1]FactorialMoment[{π, E, 2}, 2]//TogetherFactorialMoment[{1., 2., 3., 4.}, 2]FactorialMoment[N[{1, 2, 3, 4}, 30], 2]WeightedDataの階乗モーメントを求める:
FactorialMoment[WeightedData[{1, 2, 3}, {Subscript[w, 1], Subscript[w, 2], Subscript[w, 3]}], 1]data = {8, 3, 5, 4, 9, 0, 4, 2, 2, 3};
weights = {0.15, 0.09, 0.12, 0.10, 0.16, 0., 0.11, 0.08, 0.08, 0.09};FactorialMoment[WeightedData[data, weights], 2]EventDataの階乗モーメントを求める:
e = {1.0, 2.1, 3.2, 4.5, 5.7};
ci = {0, 0, 0, 1, 0};FactorialMoment[EventData[e, ci], 2]TimeSeriesの階乗モーメントを求める:
FactorialMoment[TemporalData[TimeSeries, {{{2.3, 1.2, 6.7, 5.8, 7.1, 4.6}}, {{0, 5, 1}}, 1, {"Discrete", 1},
{"Discrete", 1}, 1, {}}, False, 10.], 2]FactorialMoment[TemporalData[TimeSeries, {{{2.3, 1.2, 6.7, 5.8, 7.1, 4.6}}, {{0, 5, 1}}, 1, {"Discrete", 1},
{"Discrete", 1}, 1, {}}, False, 10.]["Values"], 2]配列データ (4)
FactorialMomentは,行列については列ごとの平均を与える:
FactorialMoment[(| | |
| ----- | ----- |
| a1, 1 | a1, 2 |
| a2, 1 | a2, 2 |), 2]FactorialMomentは,配列については第1レベルの列ごとの平均を与える:
FactorialMoment[Array[Subscript[a, ##]&, {2, 2, 2}], 2]//Simplify//MatrixForm配列についての多変量FactorialMoment:
FactorialMoment[Array[Subscript[a, ##]&, {2, 2, 2}], {2, 2}]//Simplify//TraditionalForm%//FunctionExpand//SimplifyFactorialMoment[RandomReal[1, 10 ^ 7], 2]FactorialMoment[RandomReal[1, {10 ^ 6, 5}], 1]入力がAssociationのとき,FactorialMomentはその値に作用する:
mat = RandomReal[1, {2, 2}];
assoc = AssociationThread[Range[2], mat]FactorialMoment[assoc, 3]SparseArrayデータは密は配列のように使うことができる:
FactorialMoment[SparseArray[{{1} -> 1, {100} -> 1}], 1]FactorialMoment[SparseArray[{{1, 1} -> 1, {2, 2} -> 2, {3, 3} -> 3, {1, 3} -> 4}], 2]画像データと音声データ (2)
FactorialMoment[[image], 5]RGBColor[%]FactorialMoment[[image], 4]FactorialMomentは,音声オブジェクトについてはチャンネルごとに作用する:
a = ExampleData[{"Audio", "Bee"}]AudioMeasurements[a, "Channels"]FactorialMoment[a, 3]分布のモーメントと過程のモーメント (5)
FactorialMoment[BinomialDistribution[n, p], 1]//TogetherFactorialMoment[NormalDistribution[μ, σ], 2]FactorialMoment[BinormalDistribution[{Subscript[μ, 1], Subscript[μ, 2]}, {Subscript[σ, 1], Subscript[σ, 2]}, ρ], 2]FactorialMoment[DirichletDistribution[{a, b, c}], 2]//SimplifyFactorialMoment[MultinomialDistribution[n, {Subscript[p, 1], Subscript[p, 2], Subscript[p, 3]}], {1, 1, 1}]FactorialMoment[BinormalDistribution[{Subscript[μ, 1], Subscript[μ, 2]}, {Subscript[σ, 1], Subscript[σ, 2]}, ρ], {2, 2}]FactorialMoment[PoissonDistribution[μ], r]階乗モーメントは特定の次数についてしか評価されないことがある:
FactorialMoment[BorelTannerDistribution[𝒶, n], r]% /. {r -> 2}FactorialMoment[VonMisesDistribution[Pi / 2, 2], 4]N[%]FactorialMoment[TransformedDistribution[x^2, xNormalDistribution[μ, σ]], 1]FactorialMoment[ProbabilityDistribution[(Sqrt[2] / π)(1 / (1 + (x - 2)^4)), {x, -∞, ∞}], 2]data = RandomVariate[NormalDistribution[], 10 ^ 3];FactorialMoment[HistogramDistribution[data], 4]FactorialMoment[BrownianBridgeProcess[μ, σ][t], 2]Plot[Evaluate[% /. {μ -> 3, σ -> 1}], {t, 0, 1}, PlotRange -> All]ある時点 t=0.5におけるTemporalDataの階乗モーメントを求める:
td = RandomFunction[WienerProcess[1, 1], {0, 10, 0.05}, 500]FactorialMoment[td[0.5], 1]対応する階乗モーメント関数をすべてのシミュレーションとともに求める:
Show[ListLinePlot[td, PlotStyle -> Directive[Opacity[0.2], Thin]], Plot[FactorialMoment[td[t], 1], {t, 0, 10}, PlotStyle -> Thick]]形式的なモーメント (4)
形式的なモーメントのTraditionalFormによる表示:
FactorialMoment[r]//TraditionalFormFactorialMoment[{p, q, r}]//TraditionalForm形式的なモーメントの組合せを,FactorialMomentを含む式に変換する:
MomentConvert[Moment[2], FactorialMoment]//TraditionalFormMomentConvert[CentralMoment[2]Cumulant[2], FactorialMoment]//TraditionalFormMomentEvaluate[FactorialMoment[2] + FactorialMoment[3], PoissonDistribution[λ]]data = RandomVariate[PoissonDistribution[1], 10^4];MomentEvaluate[FactorialMoment[2] + FactorialMoment[3], data]FactorialMomentを含む式についてのサンプル推定量を求める:
estimator = MomentConvert[FactorialMoment[2], "UnbiasedSampleEstimator"]data = RandomVariate[PoissonDistribution[1], 10^4];MomentEvaluate[estimator, data]アプリケーション (4)
data = RandomVariate[SkellamDistribution[2, 5], 10 ^ 4];NSolve[Table[FactorialMoment[data, k] == FactorialMoment[SkellamDistribution[m1, m2], k], {k, 1, 2}], {m1, m2}]Show[Histogram[data, Automatic, "ProbabilityDensity"], DiscretePlot[Evaluate[PDF[SkellamDistribution[m1, m2], x] /. %], {x, -10, 10}, PlotStyle -> PointSize[Medium]]]fm[r_] = (7 / 3)^-r(3 + (-1)^r) / 4;fmgf = Sum[fm[r](t - 1) ^ r / r!, {r, 0, Infinity}]dist = ProbabilityDistribution[
SeriesCoefficient[fmgf, {t, 0, k}], {k, 0, Infinity, 1}]求まった分布の階乗モーメントがもとの階乗モーメントと一致することを確認する:
Table[FactorialMoment[dist, r], {r, 0, 6}]Table[fm[r], {r, 0, 6}]data = TemporalData[TimeSeries, {{{0., -0.1658757846470872, -0.2728638398721067, -0.20572896599603147,
-0.10538217461042272, -0.05347321047935807, -0.09210914812542037, -0.19681903814874602,
-0.2868001703261339, -0.39654025546507443, -0.42843667 ... 4643, -0.020432977410382067, 0.061353433083862305,
-0.05763556841195196}}, {{0, 1., 0.01}}, 1, {"Continuous", 1}, {"Continuous", 1}, 1,
{ValueDimensions -> 1, ResamplingMethod -> {"Interpolation", InterpolationOrder -> 1}}}, False,
10.1];md = MovingMap[FactorialMoment[#, 2]&, data, .1];ListLinePlot[md, PlotRange -> All]ランダム過程の経路集合のスライスについて,階乗モーメントを計算する:
data = RandomFunction[WienerProcess[], {0, 1, .01}, 10 ^ 3];times = Range[0, 1, .1];fm = Map[{#, FactorialMoment[data[#], 2]}&, times];Show[ListPlot[data], ListLinePlot[fm, PlotStyle -> StandardRed]]特性と関係 (5)
階乗モーメント
はFactorialPowerの期待値と等しい:
FactorialMoment[PoissonDistribution[μ], 2]Expectation[FactorialPower[x, 2], xPoissonDistribution[μ]]一次階乗モーメントはMeanと等しい:
FactorialMoment[{Subscript[x, 1], Subscript[x, 2], Subscript[x, 3], Subscript[x, 4], Subscript[x, 5]}, 1]Mean[{Subscript[x, 1], Subscript[x, 2], Subscript[x, 3], Subscript[x, 4], Subscript[x, 5]}]FactorialMomentは
を使ってMomentから計算することができる:
With[{r = 5, 𝒟 = BinomialDistribution[n, p]}, Subsuperscript[∑, k = 1, r]StirlingS1[r, k]Moment[𝒟, k]]With[{r = 5, 𝒟 = BinomialDistribution[n, p]}, FactorialMoment[𝒟, r]]Simplify[%% - %]MomentConvertも同じ結果を生む:
MomentConvert[FactorialMoment[5], Moment]Subsuperscript[∑, k = 1, r]StirlingS1[r, k]Moment[k] /. r -> 5Momentは
を使ってFactorialMomentから計算することができる:
With[{r = 5, 𝒟 = ExponentialDistribution[λ]}, Underoverscript[∑, k = 0, r]StirlingS2[r, k]FactorialMoment[𝒟, k]]With[{r = 5, 𝒟 = ExponentialDistribution[λ]}, Moment[𝒟, r]]Simplify[%% - %]MomentConvertも同じ結果を生む:
MomentConvert[Moment[5], FactorialMoment]Subsuperscript[∑, k = 1, r]StirlingS2[r, k]FactorialMoment[k] /. r -> 5arr = Array[Subscript[a, Row@{##}]&, {n = 4, m = 3, 2, 3}];
rs = {2, 2, 2};
Length[rs] == mFactorialMoment[arr, rs] ==
ArrayReduce[Mean,
ArrayReduce[Times@@FactorialPower[#, rs]&, arr, 2],
1]//Simplifyおもしろい例題 (1)
30個,100個,300個のサンプルについてFactorialMomentの分布を推定する:
FactorialMoment[ExponentialDistribution[0.9], 2]SmoothHistogram[Table[FactorialMoment[RandomVariate[ExponentialDistribution[0.9], {s, 1000}], 2], {s, {30, 100, 300}}], Filling -> Axis, PlotLegends -> {30, 100, 300}, PlotRange -> {{0, 4}, Automatic}]関連するガイド
-
▪
- 統計モーメントと母関数 ▪
- 記述統計 ▪
- 記号的なベクトル,行列,配列
テキスト
Wolfram Research (2010), FactorialMoment, Wolfram言語関数, https://reference.wolfram.com/language/ref/FactorialMoment.html (2024年に更新).
CMS
Wolfram Language. 2010. "FactorialMoment." Wolfram Language & System Documentation Center. Wolfram Research. Last Modified 2024. https://reference.wolfram.com/language/ref/FactorialMoment.html.
APA
Wolfram Language. (2010). FactorialMoment. Wolfram Language & System Documentation Center. Retrieved from https://reference.wolfram.com/language/ref/FactorialMoment.html
BibTeX
@misc{reference.wolfram_2026_factorialmoment, author="Wolfram Research", title="{FactorialMoment}", year="2024", howpublished="\url{https://reference.wolfram.com/language/ref/FactorialMoment.html}", note=[Accessed: 12-September-2026]}
BibLaTeX
@online{reference.wolfram_2026_factorialmoment, organization={Wolfram Research}, title={FactorialMoment}, year={2024}, url={https://reference.wolfram.com/language/ref/FactorialMoment.html}, note=[Accessed: 12-September-2026]}