HeunT[q,α,γ,δ,ϵ,z]
三重合流型Heun関数を与える.
HeunT
HeunT[q,α,γ,δ,ϵ,z]
三重合流型Heun関数を与える.
例題
すべて開く すべて閉じる例 (3)
スコープ (24)
数値評価 (8)
N[HeunT[9 / 10, -14 / 10, 12 / 100, 3 / 100, -2 / 10, 1 / 10], 50]HeunT[9 / 10, -14 / 10, 12 / 100, 3 / 100, -2 / 10, 0.10000000000000000001]HeunTは1つまたは複数の複素パラメータを取ることができる:
HeunT[1.2 + I, -1.4, 0.12, 0.03, -0.2, 0.1]HeunT[1.2 + I, -1.4 + 0.I, 0.12 - I, 0.03 + 0.123I, -0.2 - 0.2I, 0.1]HeunTは複素引数を取ることができる:
HeunT[1.2, -1.4, 0.12, 0.03, -0.2, 0.1 + I]さらに,HeunTはすべての複素数入力を取ることができる:
HeunT[1.2 + I, -1.4 + 0.I, 0.12 - I, 0.03 + 0.123I, -0.2 - 0.2I, 0.1 + I]HeunTを高精度で効率よく評価する:
HeunT[1 / 2, -1 / 3, 1 / 4, 1 / 5, -1 / 6, 1 / 7`100]//TimingHeunT[1 / 2, -1 / 3, 1 / 4, 1 / 5, -1 / 6, 1 / 7 + I / 2`100]//TimingHeunT[1.2, -1.4, 0.12, 0.03, -0.2, {0.15, 0.1 + I, I, 4}]HeunT[-0.2, {1.3, -0.4}, 0.12, -0.14, 4.32, -1.4]HeunT[1.2, -1.4, 0.12, 0.03, -0.2, (| | |
| :- | :---- |
| π | u |
| v | (π/2) |) ]HeunT[.1, .1 + I, 0.12, 1, -0.32, {{.01, -1}, {.3, .2}}]MatrixFunctionを使って行列のHeunT関数を計算することもできる:
MatrixFunction[HeunT[.1, .1 + I, 0.12, 1, -0.32, #]&, {{.01, -1}, {.3, .2}}]特定の値 (2)
可視化 (5)
HeunT関数をプロットする:
Plot[HeunT[4, -0.6, 0.7 , 1.18, -1.3 , z], {z, -1, 1}]複素パラメータについてのHeunT関数の絶対値をプロットする:
Plot[Abs[HeunT[4 + I, -0.6 - 0.3I, -0.7 , -0.18, 0.3 , z]], {z, -2, 1}]HeunTを第2パラメータ
の関数としてプロットする:
Plot[HeunT[4, α, -0.7, -0.18, 0.3 , z] /. α -> {-2, Sqrt[20], 1 / 10}//Evaluate, {z, -1, 1}]HeunTを
と
の関数としてプロットする:
{α, γ, ϵ, δ} = {0.2 + I, -0.6 + 0.9 I, -0.7 I, 0.3 + 0.6 I};Plot3D[Abs[HeunT[q, α, γ, δ, ϵ, z]], {q, -20, 2}, {z, 1 / 10, 9 / 10}, ColorFunction -> Function[{q, z, HT}, Hue[HT]], PlotRange -> All]HeunT関数族をさまざまなアクセサリパラメータ
についてプロットする:
{α, γ, δ, ϵ} = {0.8 + 0.7 I, 0.92 + 0.33I, 0.21 + 0.72 I, -0.76 - 0.81I};Plot[Evaluate[Table[Abs[HeunT[q, α, γ, δ, ϵ, z]], {q, -18, 3, 3}]], {z, -4, 7 / 2}, PlotStyle -> Table[{Hue[i / 10], Thickness[0.002]}, {i, 20}], PlotRange -> {0, 4}, Frame -> True, Axes -> False]微分 (2)
HeunTの
次導関数はHeunTPrimeである:
D[HeunT[q, α, γ, δ, ϵ, z], z]HeunTのより高次の導関数はHeunTPrimeを使って計算される:
D[HeunT[q, α, γ, δ, ϵ, z], {z, 2}]//Simplify積分 (3)
HeunTの不定積分は初等関数やその他の特殊関数によっては表されない:
Integrate[HeunT[q, α, γ, δ, ϵ, z], z]HeunTの数値定積分:
NIntegrate[HeunT[12 / 10, -14 / 10, 12 / 100, 3 / 100, -2 / 10, z], {z, 0, 1 / 3}]HeunTを含むその他の積分:
NIntegrate[z ^ 2 HeunT[12 / 10, -14 / 10, 12 / 100, 3 / 100, -2 / 10, z], {z, -1, 1 / 3}]NIntegrate[Sin[Sqrt[z]] ^ 2 HeunT[12 / 10, -14 / 10, 12 / 100, 3 / 100, -2 / 10, z], {z, -1, 1 / 3}]級数展開 (4)
原点におけるHeunTのテイラー(Taylor)展開:
Series[HeunT[q, α, γ, δ, ϵ, z], {z, 0, 3}]
におけるHeunTの級数展開の第3項の係数:
SeriesCoefficient[HeunT[q, α, γ, δ, ϵ, z], {z, 0, 3}]
の周囲のHeunTの最初の3つの近似をプロットする:
{q, α, γ, δ, ϵ} = {-8, -9 / 10, 1 / 10, 4 / 7, 3 / 2};terms = Normal@Table[Series[HeunT[q, α, γ, δ, ϵ, z], {z, 0, m}], {m, 1, 4}];Plot[{HeunT[q, α, γ, δ, ϵ, z], terms}, {z, -3, 3}, PlotRange -> {-5, 5}, PlotLegends -> {"HeunT[q, α, γ, δ, ϵ, z]", "1st approximation", "2nd approximation", "3rd approximation", "4th approximation"}]任意の通常の複素点におけるHeunTの級数展開:
Series[HeunT[q, α, γ, δ, ϵ, z], {z, 1 / 2, 1}]//FullSimplifyアプリケーション (5)
DSolveを使って三重合流型Heun微分方程式を解く:
sol = DSolve[ y''[z] + (γ + δ z + ϵ z^2)y'[z] + (α z - q)y[z] == 0, y[z], z]{q, α, γ, δ, ϵ} = {4, -10, 1 / 3, 0, -1 / 3};Plot[y[z] /. sol /. {{C[1] -> 1, C[2] -> 0}, {C[1] -> 0, C[2] -> 1}, {C[1] -> 1 / 3, C[2] -> 1 / 3}}//Evaluate, {z, -4, 1}]sol = DSolveValue[{y''[z] + (γ + δ z + ϵ z^2)y'[z] + (α z - q)y[z] == 0, y[0] == 1, y'[0] == 0}, y[z], z]さまざまなアクセサリパラメータ q について解をプロットする:
{α, γ, δ, ϵ} = {-10, 1 / 3, 4 / 3, -1 / 3};Plot[Abs[sol] /. q -> {1, 2, 3, 4}//Evaluate, {z, -5 / 2, 1}]y[z_] := HeunT[q, α, γ, δ, ϵ, z]y''[z] + (γ + δ z + ϵ z^2)y'[z] + (α z - q)y[z] == 0//Simplify1Dシュレディンガー(Schrödinger)方程式についての四次ポテンシャル:
V[z_] := λ^2(Underoverscript[∏, i = 1, 4](z - Subscript[z, i]))この一般ポテンシャルをHeunT関数で解く:
{Subscript[z, 1], Subscript[z, 2], Subscript[z, 3], Subscript[z, 4]} = {1, 2, 3, 4};DSolve[u''[z] - V[z]u[z] == 0, u[z], z]
のとき,HeunTはエアリー関数で表すことができる:
y[z_] = FunctionExpand[HeunT[0, -1, 0, 0, 0, z]]y''[z] - z y[z] == 0//Simplify特性と関係 (4)
HeunTの計算は,引数が大きいと時間がかかるかもしれない:
Series[HeunT[q, α, γ, δ, ϵ, z], {z, 0, 2}]HeunTは任意の有限複素
において計算できる:
HeunT[4 + I, -1 / 2, 1 / 4, -7 / 5, 2, z] /. z -> RandomComplex[{-2 - I, 2 + I}, 5]HeunTの導関数はHeunTPrimeである:
D[HeunT[q, α, γ, δ, ϵ, z], z]FunctionExpandを使ってHeunTをより簡単な関数に展開する:
FunctionExpand[HeunT[q, 0, 1, 1, 0, z]]考えられる問題 (1)
HeunTは大きい引数については発散する:
AbsoluteTiming[HeunT[0.03 + I, 1.3, 1, 0.12, 4.32, 20]]おもしろい例題 (1)
古典的な非調和振動子方程式はHeunTによって解くことができる:
sol = DSolve[u''[z] + (Subscript[λ, 1] + Subscript[λ, 2]z^2 + Subscript[λ, 4] z^4)u[z] == 0, u[z], z]{Subscript[λ, 1], Subscript[λ, 2], Subscript[λ, 4]} = {1, 1 / 2, 1 / 4};Plot[{u[z] /. sol /. {C[1] -> 1, C[2] -> 1}}, {z, 0, 9 / 2}]関連するガイド
テキスト
Wolfram Research (2020), HeunT, Wolfram言語関数, https://reference.wolfram.com/language/ref/HeunT.html.
CMS
Wolfram Language. 2020. "HeunT." Wolfram Language & System Documentation Center. Wolfram Research. https://reference.wolfram.com/language/ref/HeunT.html.
APA
Wolfram Language. (2020). HeunT. Wolfram Language & System Documentation Center. Retrieved from https://reference.wolfram.com/language/ref/HeunT.html
BibTeX
@misc{reference.wolfram_2026_heunt, author="Wolfram Research", title="{HeunT}", year="2020", howpublished="\url{https://reference.wolfram.com/language/ref/HeunT.html}", note=[Accessed: 26-June-2026]}
BibLaTeX
@online{reference.wolfram_2026_heunt, organization={Wolfram Research}, title={HeunT}, year={2020}, url={https://reference.wolfram.com/language/ref/HeunT.html}, note=[Accessed: 26-June-2026]}