EllipticF[ϕ,m]
第1種楕円積分
を与える.
EllipticF
EllipticF[ϕ,m]
第1種楕円積分
を与える.
詳細
- 記号操作・数値操作の両方に適した数学関数である.
- 実数
について,
かつ
のとき,
が成り立つ. - EllipticFに関する完全楕円積分は,EllipticKである.
- EllipticFは実数引数についてJacobiAmplitudeの逆関数である.
のとき,
について
である. - EllipticF[ϕ,m]は,
および
で分枝が不連続となる. - 特別な引数の場合,EllipticFは,自動的に厳密値を計算する.
- EllipticFは任意の数値精度で評価できる.
- EllipticFは自動的にリストに縫い込まれる.
- EllipticFはIntervalオブジェクトおよびCenteredIntervalオブジェクトに使うことができる. »
例題
すべて開く すべて閉じる例 (4)
EllipticF[0.3, 0.8]Plot[EllipticF[ϕ, 0.5], {ϕ, 0, Pi / 2}]ComplexPlot3D[EllipticF[z, 0.5], {z, -2 - 2 I, 2 + 2 I}, PlotLegends -> Automatic, Exclusions -> All]Series[EllipticF[ϕ, m], {ϕ, 0, 8}]スコープ (36)
数値評価 (5)
EllipticF[3 + 2.5 I, 2.3 - 1.5 I]N[EllipticF[12 / 5, 3], 50]EllipticF[2, 0.9999999999999999990000000000000000000]EllipticF[2, 0.9999999999999999990000000000000000000000000000000000]EllipticFを高精度で効率よく評価する:
EllipticF[2, 0.4`500]//TimingEllipticF[2, 0.4`100000];//TimingIntervalオブジェクトとCenteredIntervalオブジェクトを使って最悪の場合に保証される区間を計算する:
EllipticF[0.2, Interval[{0.3, 0.4}]]EllipticF[1, CenteredInterval[-4, 1 / 10]]Aroundを使って平均的な場合の統計区間を計算することもできる:
EllipticF[ Around[2, 0.01], 1 / 2]EllipticF[{{1, 0}, {0, 1}}, 0]MatrixFunctionを使って行列のEllipticF関数を計算することもできる:
MatrixFunction[EllipticF[#, 0]&, {{1, 0}, {0, 1}}]特定の値 (5)
EllipticF[ϕ, 0]{EllipticF[0, m], EllipticF[Pi / 2, m]}EllipticF[ϕ, Infinity]Limit[EllipticF[2 + ε I, 2], ε -> 0, Direction -> -1]Limit[EllipticF[2 + ε I, 2], ε -> 0, Direction -> +1]f[m_] := EllipticF[π, m] - 3;
xzero = Solve[f[m] == 0 && -1.0 < m < 0, m][[1, 1, 2]]//QuietPlot[f[m], {m, -1, 1}, Epilog -> Style[Point[{xzero, f[xzero]}], PointSize[Large], Red]]EllipticFは,その第1パラメータに対して奇関数である:
EllipticF[-ϕ, m]可視化 (3)
Plot[{EllipticF[ϕ, 0], EllipticF[ϕ, 1], EllipticF[ϕ, 2]}, {ϕ, -2, 2}]Plot[{EllipticF[π, m], EllipticF[π / 2, m], EllipticF[-π / 2, m], EllipticF[-π, m]}, {m, -10, 2}, IconizedObject[«PlotOptions»]]ComplexContourPlot[Re[EllipticF[z, 1]], {z, -π / 2 - I π / 2 , π / 2 + I π / 2}, IconizedObject[«PlotOptions»]]ComplexContourPlot[Im[EllipticF[z, 1]], {z, -π / 2 - I π / 2 , π / 2 + I π / 2}, IconizedObject[«PlotOptions»]]関数の特性 (10)
FunctionDomain[EllipticF[ϕ, 0.5], ϕ]FunctionRange[EllipticF[ϕ, 0.5], ϕ, y]//QuietEllipticFはその第1パラメータについての奇関数である:
EllipticF[-ϕ, m]FunctionAnalytic[EllipticF[ϕ, .5], ϕ]FunctionSingularities[EllipticF[ϕ, .5], ϕ]//QuietFunctionDiscontinuities[EllipticF[ϕ, .5], ϕ]//QuietFunctionMeromorphic[EllipticF[n, m], {n, m}]FunctionDomain[EllipticF[ϕ, 2], ϕ]FunctionMonotonicity[{EllipticF[ϕ, 2], -(π/4) ≤ ϕ ≤ (π/4)}, ϕ]//QuietFunctionInjective[EllipticF[ϕ, 2], ϕ]Plot[{EllipticF[ϕ, 2], .5}, {ϕ, -π / 2, π / 2}]FunctionSurjective[EllipticF[ϕ, 2], ϕ]Plot[{EllipticF[ϕ, 2], 2}, {ϕ, -π, π}]FunctionSign[{EllipticF[ϕ, 2], -(π / 4) <= ϕ <= π / 4}, ϕ]FunctionConvexity[{EllipticF[ϕ, 2], -(π / 4) <= ϕ <= π / 4}, ϕ]微分 (3)
D[EllipticF[ϕ, m], ϕ]derivs = Table[D[EllipticF[ϕ, m], {ϕ, n}], {n, 1, 3}]//FullSimplifyPlot[Evaluate[derivs /. m -> 1], {ϕ, -π / 2, π / 2}, PlotLegends -> {"First Derivative", "Second Derivative", "Third Derivative"}]D[EllipticF[ϕ, m], m]積分 (3)
EllipticFの不定積分:
Integrate[EllipticF[ϕ, m], m]Integrate[EllipticF[ϕ, m], {ϕ, -1, 1}]Integrate[Sin[z]EllipticF[z, m] , z]Integrate[( Sin[2 z]EllipticF[z, m]/(1 - m Sin[z]^2)^3 / 2), z]級数展開 (3)
EllipticFのテイラー(Taylor)展開:
Series[EllipticF[ϕ, m], {ϕ, 0, 5}]terms = Normal@Table[Series[EllipticF[ϕ, 1], {ϕ, 0, n}], {n, 1, 5, 2}];
Plot[{EllipticF[ϕ, 1], terms}, {ϕ, -2, 2}]Series[EllipticF[ϕ, m], {m, 0, 3}]terms = Normal@Table[Series[EllipticF[π, m], {m, 0, n}], {n, 1, 3}];
Plot[{EllipticF[π, m], terms}, {m, -1, 1}, PlotLegends -> "Expressions"]EllipticFはベキ級数に適用できる:
EllipticF[ϕ + (ϕ^2/2) + (ϕ^3/3) + O[ϕ]^4, m]EllipticF[ϕ, m + (m^2/2) + (m^3/3) + O[m]^4]関数表現 (4)
Integrate[(1/Sqrt[1 - m Sin[θ] ^ 2]), {θ, 0, ϕ}, Assumptions -> 0 ≤ ϕ ≤ π / 2]EllipticPiとの関係:
EllipticPi[0, ϕ, m]EllipticFはDifferentialRootとして表すことができる:
DifferentialRootReduce[EllipticF[ϕ, m], m]TraditionalFormによる表示:
EllipticF[ϕ, m] // TraditionalFormアプリケーション (5)
Integrate[(1/Sqrt[a x^4 + b]), x]Plot3D[Im[EllipticF[x + I y, 1 / 2]], {x, -2Pi, 2Pi}, {y, -3, 3}]area[a_, b_, c_] := With[{m = (a^2(b^2 - c^2)/b^2(a^2 - c^2)), ϑ = ArcSin[Sqrt[1 - (c^2/a^2)]]}, 2 π((b c^2 /Sqrt[a^2 - c^2])EllipticF[ϑ, m] + c^2 + b Sqrt[a^2 - c^2] EllipticE[ϑ, m])] /; a > b > c;area[3, 2, 1]//NWith[{a = 3, b = 2, c = 1}, NIntegrate[Sin[ϑ]Sqrt[b^2c^2Cos[φ]^2Sin[ϑ]^2 + a^2c^2Sin[φ]^2Sin[ϑ]^2 + a^2b^2Cos[ϑ]^2], {φ, 0, 2Pi}, {ϑ, 0, Pi}]]DSolve[s'[φ] == -(c/Sqrt[Cos[φ]]), s[φ], φ]マイラー(Mylar)樹脂製の風船(2つの平たいプラスチックシートの周囲を縫い合わせ,膨らませたもの)のパラメータ化:
x[u_, v_] := (Cos[v]/Sqrt[Cosh[2u]])
y[u_, v_] := (Sin[v]/Sqrt[Cosh[2u]])
z[u_, v_] := With[{f = ArcSin[(Sqrt[2]Sinh[u]/Sqrt[Cosh[2u]])]}, Sqrt[2](EllipticE[f, (1/2)] - (1/2)EllipticF[f, (1/2)])]ParametricPlot3D[{x[u, v], y[u, v], z[u, v]}, {v, 0, 2Pi}, {u, -8, 8}, PlotRange -> All]Block[{h, g}, h[u_] = x[u, v] / Cos[v];g[u_] = z[u, v];(((g''[u]h'[u] - g'[u]h''[u]/(g'[u]^2 + h'[u]^2)^3 / 2))/((g'[u]/h[u]Sqrt[g'[u]^2 + h'[u]^2])))//Simplify]Module[{h, g}, h[u_] = x[u, v] / Cos[v];g[u_] = z[u, v];Integrate[Sqrt[h'[u]^2 + g'[u]^2]//Simplify, {u, 0, ∞}]]N[%, $MachinePrecision]特性と関係 (7)
EllipticF[ϕ,m]は,以下の制約条件のもとで,実数引数については実数値である:
FunctionDomain[EllipticF[ϕ, m], {ϕ, m}, Reals]EllipticF[ArcCsc[Sqrt[m]], m]//FunctionExpandEllipticF[z, 1]//FunctionExpandFunctionExpand[%, 0 < z < Pi / 2]逆関数を伴う合成にはPowerExpandが必要である:
EllipticF[JacobiAmplitude[z, m], m]PowerExpand[%]JacobiAmplitude[EllipticF[z, m], m]PowerExpand[%]EllipticFを含む方程式を解く:
Solve[EllipticF[z, m]^3 + EllipticF[z, m] == x, z]FindRoot[EllipticF[z, 2]^3 + EllipticF[z, 2] + z == 2, {z, 1}]Limit[EllipticF[2 + ε I, 2], ε -> 0, Direction -> -1]//QuietLimit[EllipticF[2 + ε I, 2], ε -> 0, Direction -> +1]//QuietWith[{m = 1 / 3}, {ParametricPlot[{ϕ, EllipticF[ϕ, m]}, {ϕ, -2Pi, 2Pi}, PlotStyle -> Thick], ParametricPlot[{JacobiAmplitude[u, m], u}, {u, -4 EllipticK[m], 4EllipticK[m]}, PlotStyle -> Directive[Dashed, Orange]]}]Show[%, ImageSize -> Tiny]With[{m = 4}, {ParametricPlot[{ϕ, EllipticF[ϕ, m]}, {ϕ, -ArcSin[m^-1 / 2], ArcSin[m^-1 / 2]}, PlotStyle -> Thick], ParametricPlot[{JacobiAmplitude[u, m], u}, {u, -(1/Sqrt[m])EllipticK[1 / m], (1/Sqrt[m])EllipticK[1 / m]}, PlotStyle -> Directive[Dashed, Orange]]}]Show[%, ImageSize -> Tiny]考えられる問題 (2)
Integrate[(1/Sqrt[1 - m Sin[t]^2]), {t, 0, z}]Integrate[1 / Sqrt[1 - k ^ 2 Sin[t] ^ 2], {t, 0, z}, Assumptions -> 0 < k < 1 && 0 < z < 1]Integrate[1 / Sqrt[(1 - t ^ 2) (1 - m t ^ 2)], {t, 0, z}, Assumptions -> 0 < m < 1 && 0 < z < 1]おもしろい例題 (2)
NestList[D[#, x]&, EllipticF[x, m], 4]//Simplify//TraditionalFormEllipticFを整数点でプロットする:
ArrayPlot[Table[Mod[Round[Abs[EllipticF[x y, 0.3]]], 2], {x, -50, 50}, {y, -50, 50}]]テクニカルノート
履歴
1988 で導入 (1.0) | 1996 で更新 (3.0) ▪ 2020 (12.2) ▪ 2021 (13.0) ▪ 2022 (13.1)
テキスト
Wolfram Research (1988), EllipticF, Wolfram言語関数, https://reference.wolfram.com/language/ref/EllipticF.html (2022年に更新).
CMS
Wolfram Language. 1988. "EllipticF." Wolfram Language & System Documentation Center. Wolfram Research. Last Modified 2022. https://reference.wolfram.com/language/ref/EllipticF.html.
APA
Wolfram Language. (1988). EllipticF. Wolfram Language & System Documentation Center. Retrieved from https://reference.wolfram.com/language/ref/EllipticF.html
BibTeX
@misc{reference.wolfram_2026_ellipticf, author="Wolfram Research", title="{EllipticF}", year="2022", howpublished="\url{https://reference.wolfram.com/language/ref/EllipticF.html}", note=[Accessed: 14-September-2026]}
BibLaTeX
@online{reference.wolfram_2026_ellipticf, organization={Wolfram Research}, title={EllipticF}, year={2022}, url={https://reference.wolfram.com/language/ref/EllipticF.html}, note=[Accessed: 14-September-2026]}