InverseWeierstrassP[p,{g2,g3}]
p に等しいワイエルシュトラス関数
の u の値を返す.
InverseWeierstrassP
InverseWeierstrassP[p,{g2,g3}]
p に等しいワイエルシュトラス関数
の u の値を返す.
詳細
- 記号操作・数値操作の両方に適した数学関数である.
- 返される u の値は,
と
により定義される基本周期平行四辺形の中に必ず存在する. - InverseWeierstrassP[{p,q},{g2,g3}]は,
で
とする u の値を求める.このような値が存在するためには,p と q は
の式を満たさなければならない. - InverseWeierstrassPは任意の数値精度で評価できる.
例題
すべて開く すべて閉じる例 (4)
InverseWeierstrassP[2., {1, 2}]//ChopWeierstrassP[%, {1, 2}]Plot[InverseWeierstrassP[x, {1, 2}], {x, 2, 6}]ComplexPlot3D[InverseWeierstrassP[z, {1, 2}], {z, -2 - 2I, 2 + 2I}, PlotLegends -> Automatic]Series[InverseWeierstrassP[x, {1, 2}], {x, 0, 5}]スコープ (20)
数値評価 (4)
InverseWeierstrassP[7., {1, 2}]InverseWeierstrassP[11., {3, 2}]N[InverseWeierstrassP[1 / 3, {1, 2}], 50]InverseWeierstrassP[3.222222222222222222222, {1, 2}]InverseWeierstrassP[3. + I, {I, I + 2}]InverseWeierstrassP[16`100, {3, 2}]//TimingInverseWeierstrassP[15`10000, {4, 2}];//Timing//Quiet特定の値 (4)
Table[InverseWeierstrassP[x, {0, 0}], {x, {-1, 2}}]InverseWeierstrassP[0, {0, 0}]InverseWeierstrassP[x,{1,2}]=2となるような x の値を求める:
xval = x /. FindRoot[InverseWeierstrassP[x, {1, 2} ] == 2, {x, 3}]//ChopPlot[InverseWeierstrassP[x, {1, 2} ], {x, 1, 5}, Epilog -> Style[Point[{xval, InverseWeierstrassP[xval, {1, 2} ]}], PointSize[Large], Red]]TraditionalFormによる表示:
InverseWeierstrassP[z, {Subscript[g, 2], Subscript[g, 3]}]//TraditionalForm可視化 (2)
InverseWeierstrassP関数をさまざまなパラメータについてプロットする:
Plot[{InverseWeierstrassP[u, {2, 3}], InverseWeierstrassP[u, {4, 3}], InverseWeierstrassP[u, {4, 5}]}, {u, 1, 4}]ComplexContourPlot[Re[InverseWeierstrassP[z, {7, 1}]], {z, -3 - 3 I, 3 + 3I}, Contours -> 20]ComplexContourPlot[Im[InverseWeierstrassP[z, {7, 1}]], {z, -3 - 3 I, 3 + 3I}, Contours -> 20]関数の特性 (4)
InverseWeierstrassPは特異点と不連続点の両方を持つ:
FunctionSingularities[InverseWeierstrassP[x, {1, 2}], x]//QuietFunctionDiscontinuities[InverseWeierstrassP[x, {1, 2}], x]//QuietFunctionInjective[InverseWeierstrassP[x, {2, 1}], x]Plot[{InverseWeierstrassP[x, {2, 1}], 2}, {x, 0, 6}]FunctionSign[InverseWeierstrassP[x, {1, 2}], x]InverseWeierstrassP[0, {1, 2}]//NFunctionConvexity[InverseWeierstrassP[x, {1 / 2, 1 / 2}], x]InverseWeierstrassP[0, {1 / 2, 1 / 2}]//N微分 (2)
D[InverseWeierstrassP[p, {Subscript[``g``, 2], Subscript[``g``, 3]}], p]Table[D[InverseWeierstrassP[p, {Subscript[``g``, 2], Subscript[``g``, 3]}], {p, k}], {k, 1, 4}]//FullSimplifyPlot[Evaluate[% /. {Subscript[``g``, 2] -> 1, Subscript[``g``, 3] -> 2}], {p, 1, 5}, PlotLegends -> {"First Derivative", "Second Derivative", "Third Derivative", "Fourth Derivative"}]積分 (2)
Integrateを使って不定積分を計算する:
Integrate[InverseWeierstrassP[x, {g2, g3}], x]FullSimplify[D[%, x]]Integrate[InverseWeierstrassP[x, {2, 3}], {x, 0, 5}]級数展開 (2)
Seriesを使ってテイラー(Taylor)展開を求める:
Series[InverseWeierstrassP[x, {g1, g2}], {x, 0, 2}]//Normalterms = Abs@Normal@Table[Series[InverseWeierstrassP[x, {1, 2}], {x, 0, m}], {m, 1, 5, 2}];
Plot[{InverseWeierstrassP[x, {1, 2}], terms}, {x, 0, 7}]Series[InverseWeierstrassP[x, {g1, g2}], {x, x0, 2}]//Normal// FullSimplify一般化と拡張 (1)
{p, pp} = {2., 2Sqrt[7]};z = InverseWeierstrassP[{p, pp}, {1, 2}]以下はWeierstrassPとWeierstrassPPrimeの逆関数の関係である:
p == WeierstrassP[z, {1, 2}]pp == WeierstrassPPrime[z, {1, 2}]アプリケーション (2)
InverseWeierstrassPの実部と虚部をプロットする:
Plot[{Re[InverseWeierstrassP[x, {1, I}]], Im[InverseWeierstrassP[x, {1, I}]]}, {x, -2, 2}]D[InverseWeierstrassP[z, {Subscript[g, 2], Subscript[g, 3]}], {z, 6}]//TraditionalForm特性と関係 (1)
InverseWeierstrassPはEllipticLog関数と密接な関係がある:
ellipticLog[{x_, y_}, {a_, b_}] := (1/2)InverseWeierstrassP[{(1/4)(x + (a/3)), (y/4)}, {(1/4)((a^2/3) - b), (1/8)(a/3)((b/2) - ((a/3))^2)}]a = 3;b = 2;
{x, y} = EllipticExp[1.2, {a, b}];ellipticLog[{x, y}, {a, b}]EllipticLog[{x, y}, {a, b}]考えられる問題 (2)
第1引数がワイエルシュトラス
関数の値のペアを表さない場合,InverseWeierstrassPは評価されずに残る:
InverseWeierstrassP[{RandomReal[], RandomReal[]}, {1, 2}]InverseWeierstrassPは,ベクトル値の第1引数で評価できる:
InverseWeierstrassP[WeierstrassP[2, {1, 2}], {1, 2}]テクニカルノート
履歴
1996 で導入 (3.0)
テキスト
Wolfram Research (1996), InverseWeierstrassP, Wolfram言語関数, https://reference.wolfram.com/language/ref/InverseWeierstrassP.html.
CMS
Wolfram Language. 1996. "InverseWeierstrassP." Wolfram Language & System Documentation Center. Wolfram Research. https://reference.wolfram.com/language/ref/InverseWeierstrassP.html.
APA
Wolfram Language. (1996). InverseWeierstrassP. Wolfram Language & System Documentation Center. Retrieved from https://reference.wolfram.com/language/ref/InverseWeierstrassP.html
BibTeX
@misc{reference.wolfram_2026_inverseweierstrassp, author="Wolfram Research", title="{InverseWeierstrassP}", year="1996", howpublished="\url{https://reference.wolfram.com/language/ref/InverseWeierstrassP.html}", note=[Accessed: 04-November-2026]}
BibLaTeX
@online{reference.wolfram_2026_inverseweierstrassp, organization={Wolfram Research}, title={InverseWeierstrassP}, year={1996}, url={https://reference.wolfram.com/language/ref/InverseWeierstrassP.html}, note=[Accessed: 04-November-2026]}