InverseWeierstrassP[p,{g2,g3}]
给出使 Weierstrass 函数
等于 p 的 u 值.
InverseWeierstrassP
InverseWeierstrassP[p,{g2,g3}]
给出使 Weierstrass 函数
等于 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 求泰勒展开式:
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)
如果第一个参数不能表示 Weierstrass
函数的一对值,InverseWeierstrassP 保留不计算的形式:
InverseWeierstrassP[{RandomReal[], RandomReal[]}, {1, 2}]InverseWeierstrassP 计算结果的的第一个参数是向量:
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 语言. 1996. "InverseWeierstrassP." Wolfram 语言与系统参考资料中心. Wolfram Research. https://reference.wolfram.com/language/ref/InverseWeierstrassP.html.
APA
Wolfram 语言. (1996). InverseWeierstrassP. Wolfram 语言与系统参考资料中心. 追溯自 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: 05-August-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: 05-August-2026]}