Beta
詳細
- Betaは記号操作・数値操作の両方に適した数学関数である.
-
-
- Beta[z,a,b]は,複素
平面上に,
〜
の範囲で不連続な分枝切断線を持つ. - Beta[z0,z1,a,b]は,一般的不完全ベータ関数
を与える. - 不完全ベータ(Beta)関数の引数は,不完全ガンマ(Gamma)関数と異なった並び順をすることに注意.
- 特別な引数の場合,Betaは,自動的に厳密値を計算する.
- Betaは任意の数値精度で評価できる.
- Betaは自動的にリストに縫い込まれる.
- TraditionalFormの設定では,\[CapitalBeta]を使ってBetaが表示される.
- BetaはIntervalオブジェクトおよびCenteredIntervalオブジェクトに使うことができる. »
例題
すべて開く すべて閉じる例 (6)
Beta[5, 4]Beta[5 / 2, 7 / 2]Beta[2.3, 3.2]Plot[Beta[1 / 2, x], {x, -2, 3}]Plot[Beta[x, 1 / 2, 1 / 2], {x, 0, 1}]ComplexPlot3D[Beta[1 / 2, z], {z, -2 - 2I, 2 + 2I}, PlotLegends -> Automatic]Series[Beta[1 / 2, x], {x, 0, 2}]//Normal//FullSimplifyInfinityにおける級数展開:
Series[Beta[-1 / 2, x], {x, ∞, 4}]//Normalスコープ (42)
数値評価 (8)
Beta[1.1, 2.1]{Beta[0, b], Beta[a, 0]}N[Beta[22 / 10, 33 / 10], 50]Beta[2.200000000000000000000000, 33 / 10]Beta[22 / 10, 3.300000000000000000000000]Beta[100000, 100000]//ShortBeta[10. ^ 5, 10. ^ 5]Beta[2.5 + I, 1 - I]Betaを高精度で効率よく評価する:
Beta[1.1`200, 2.2`200]//TimingBeta[1.1`1000, 2.2`1000];//TimingIntervalオブジェクトとCenteredIntervalオブジェクトを使って最悪の場合に保証される区間を計算する:
Beta[2, Interval[{1.2, 2.1}]]Beta[2, CenteredInterval[2, 1 / 8]]Aroundを使って平均的な場合の統計区間を計算することもできる:
Beta[ Around[1.2, 0.01], 1, 2]Beta[{{1 / 2, -1}, {0, 1 / 2}}, 1, 2]MatrixFunctionを使って行列のBeta関数を計算することもできる:
MatrixFunction[Beta[#, 1, 2]&, {{1 / 2, -1}, {0, 1 / 2}}]//FullSimplify特定の値 (4)
Beta[Infinity, 0]Beta[0, Infinity]xmin = Solve[Beta[x, -1 / 2] == 0 && 0 < x < 1, x, Reals][[1, 1, 2]]//QuietPlot[Beta[x, -1 / 2], {x, -1, 3}, Epilog -> Style[Point[{xmin, Beta[xmin, -1 / 2]}], PointSize[Large], Red]]Beta[z, 3, b] // FunctionExpandBeta[13 / 2, 7 / 2, 9 / 2] // FunctionExpand//SimplifyBeta[1 / 4, 1 / 3, 1 / 2, 3 / 2]//FunctionExpand//Simplify可視化 (2)
関数の特性 (11)
FunctionDomain[Beta[a, b], {a, b}]FunctionDomain[Beta[az, bz], {az, bz}, Complexes]Beta[a, b] == Beta[b, a]//FullSimplifyFullSimplify[Beta[Conjugate[a], Conjugate[b]] == Conjugate[Beta[a, b]]]FunctionAnalytic[Beta[a, b], {a, b}]FunctionMeromorphic[Beta[a, b], {a, b}]FunctionSingularities[Beta[a, b], {a, b}]FunctionDiscontinuities[Beta[a, b], {a, b}]FunctionAnalytic[Beta[x, a, 1], x, Assumptions -> a > 0 && a∈ℤ]FunctionSingularities[Beta[x, 1, 1], x]FunctionDiscontinuities[Beta[x, 1, 1], x]FunctionAnalytic[Beta[x, 1 / 2, 1], x]FunctionMeromorphic[Beta[x, 1 / 2, 1], x]FunctionMonotonicity[Beta[x, 1, 2], x]
は正の奇数
については単射であるが,正の偶数
についてはそうではない:
FunctionInjective[Beta[x, 2k, 1], x, Assumptions -> k > 0 && k∈ℤ]FunctionInjective[Beta[x, 2k + 1, 1], x, Assumptions -> k > 0 && k∈ℤ]Plot[{Beta[x, 3, 1], Beta[x, 4, 1], 1}, {x, -2, 2}]
は正の奇数
については全射であるが,正の偶数
についてはそうではない:
Table[FunctionSurjective[Beta[x, a, 1], x], {a, 5}]Plot[{Beta[x, 3, 1], Beta[x, 4, 1], -1}, {x, -2, 2}]
は正の偶数
については非負であるが奇数
については不定である:
Table[FunctionSign[Beta[x, a, 1], x], {a, 5}]FunctionConvexity[Beta[x, 2k, 1], x, Assumptions -> k > 0 && k∈ℤ]TraditionalFormによる表示:
Beta[a, b]//TraditionalForm微分 (2)
D[Beta[a, b], a]D[Beta[a, b], b]derivs = Table[D[Beta[a, b], {b, n}], {n, 1, 3}]Plot[Evaluate[derivs /. a -> 1 / 2], {b, -2, 2}, PlotLegends -> {"First Derivative", "Second Derivative", "Third Derivative"}]級数展開 (5)
Series[Beta[z, -2z], {z, -5, 3}] // FullSimplifySeries[Beta[a, b], {a, 0, 1}]Series[Beta[a, b], {a, Infinity, 2}]Series[Beta[z, a, b], {z, z0, 2}]Series[Beta[z, a, b], {a, a0, 1}]Betaはベキ級数に適用できる:
Beta[1 + x + (x^2/2) + O[x]^4, 3]//Simplify関数の恒等式と簡約 (4)
一般化された不完全ベータ関数は不完全ベータ関数と関連している:
Beta[x, y, a, b]//FunctionExpandFullSimplifyを使ってベータ関数を簡約する:
FullSimplify[Beta[2 a, 2 b]Beta[b, b] / (Beta[a, b] Beta[a + 1 / 2, b])]FullSimplify[Beta[a, b] == (a + b/a)Beta[a + 1, b]]FullSimplify[Beta[a, b] == Beta[a + 1, b] + Beta[a, b + 1]]FullSimplify[Beta[a, b]Beta[a + b, c] == Beta[b, c]Beta[b + c, a]]関数表現 (6)
Gamma関数による主定義:
FunctionExpand[Beta[a, b]]Beta[z1, z2, a, b]//FunctionExpandBeta[a, b] == Integrate[x^a - 1(1 - x)^b - 1, {x, 0, 1}, Assumptions -> {Re[a] > 0, Re[b] > 0}]//FullSimplifyIntegrate[x^a - 1(1 - x)^b - 1, {x, 0, z}, Assumptions -> {Re[a] > 0 && z ≤ 1}]MeijerGReduce[Beta[x, a, b], x]Activate[%]//FullSimplifyBetaはDifferentialRootとして表すことができる:
DifferentialRootReduce[Beta[x, a, b], x]一般化と拡張 (6)
オイラーのベータ関数 (2)
Beta[0, n]Betaは要素単位でリストに縫い込まれる:
Beta[2, {2, 3, 4, 5}]不完全ベータ関数 (2)
アプリケーション (5)
Plot3D[Beta[a, b], {a, 0, 2}, {b, 0, 2}]複素平面でBetaの絶対値をプロットする:
Plot3D[Abs[Beta[x + I y, -3.1]], {x, -5, 2}, {y, -1, 1}]p[d_, s_] := d s ^ (d - 1) Beta[1 - s ^ 2 / 4, (d + 1) / 2, 1 / 2] / Beta[(d + 1) / 2, 1 / 2]Table[FullSimplify[FunctionExpand[p[d, s]], s > 0], {d, 3}]Plot[Evaluate[Table[p[d, s], {d, 10}]], {s, 0, 2}]PDF[BetaDistribution[α, β]][x]Plot[Evaluate[Flatten[Table[PDF[BetaDistribution[α, β]][x], {α, {1, 2, 3, 4} / 4}, {β, {1, 2, 3, 4} / 4}]]], {x, 0, 1}]Mean[BetaDistribution[α, β]]
(容量)を超える同時サービス要求が行われる確率は,Gamma関数とBeta関数で表すことができる:
Probability[x > c, xBinomialDistribution[n, p], Assumptions -> c∈Integers && 0 ≤ c ≤ n]特性と関係 (7)
オイラーのベータ関数をオイラーのガンマ関数の割合として表す:
FunctionExpand[Beta[a, b]]Beta[z1, z2, a, b]//FunctionExpandFullSimplifyを使ってベータ関数を簡約する:
FullSimplify[Beta[2 a, 2 b]Beta[b, b] / (Beta[a, b] Beta[a + 1 / 2, b])]FindRoot[Beta[1, z] - 4 Beta[2, z ^ 2] + z == 2, {z, 1}]Betaを含む式の総和を求める:
Underoverscript[∑, k = 1, n]Beta[k, k]Underoverscript[∑, k = 1, n](z^k/Beta[k, 2k])Underoverscript[∑, k = 1, ∞]Beta[k, b] x^kz^aHypergeometric2F1[a, 1 - b, 1 + a, z]//FullSimplifyBetaはDifferentialRootとして表すことができる:
DifferenceRootReduce[Beta[k, z], k]考えられる問題 (4)
大きい引数は,明示的に計算するのには小さすぎる結果を与えることがある:
Beta[10 ^ 20., 10. ^ 20]Beta[10. ^ 3, 10. ^ 3]MachineNumberQ[%]アルゴリズムを使って生成した結果では,ベータ関数ではなくガンマ関数や超幾何関数が使われることがよくある:
Underoverscript[∑, k = 0, ∞](Pochhammer[1 - b, k]/(a + k) k!)Integrate[t^a - 1 (1 - t)^b - 1, {t, 0, 1}, Assumptions -> Re[a] > 0∧Re[b] > 0](1/a + b - 1)Underoverscript[∏, k = 1, ∞](k (a + b + k - 2)/(a + k - 1) (b + k - 1))eq = z (1 - z) w''[z] + (1 - a + (a + b - 2) z)w'[z];
DSolve[eq == 0 , w[z], z]eq /. w -> (Beta[#, a, b + 1] + Beta[#, a + 1, b]&)//Simplify一般に,FullSimplifyではベータ関数は生成されない:
Beta[a, b]//FunctionExpandFullSimplify[%]おもしろい例題 (2)
複素平面上でBetaをネストさせる:
DensityPlot[Arg[Nest[Beta[#, #]&, x + I y, 3]], {x, -2, 4}, {y, -2, 2}, Exclusions -> {}]//QuietbetaMatrix[n_] := 1 / Array[Beta, {n, n}]Table[Det[betaMatrix[n]], {n, 10}]FindSequenceFunction[%, n]ベータ行列は対称正定値で,そのコスキー(Cholesky)分解は
の形の成分を持つ:
Table[CholeskyDecomposition[betaMatrix[n]] == Array[Sqrt[#1]Binomial[#2, #1]&, {n, n}], {n, 10}]テクニカルノート
-
▪
- 特殊関数
関連するガイド
-
▪
- ガンマ関数と関連関数 ▪
- 統計学で使用される関数 ▪
- 特殊関数
履歴
1988 で導入 (1.0) | 1996 で更新 (3.0) ▪ 2021 (13.0) ▪ 2022 (13.1)
テキスト
Wolfram Research (1988), Beta, Wolfram言語関数, https://reference.wolfram.com/language/ref/Beta.html (2022年に更新).
CMS
Wolfram Language. 1988. "Beta." Wolfram Language & System Documentation Center. Wolfram Research. Last Modified 2022. https://reference.wolfram.com/language/ref/Beta.html.
APA
Wolfram Language. (1988). Beta. Wolfram Language & System Documentation Center. Retrieved from https://reference.wolfram.com/language/ref/Beta.html
BibTeX
@misc{reference.wolfram_2026_beta, author="Wolfram Research", title="{Beta}", year="2022", howpublished="\url{https://reference.wolfram.com/language/ref/Beta.html}", note=[Accessed: 10-September-2026]}
BibLaTeX
@online{reference.wolfram_2026_beta, organization={Wolfram Research}, title={Beta}, year={2022}, url={https://reference.wolfram.com/language/ref/Beta.html}, note=[Accessed: 10-September-2026]}