我正在尝试在参数图中生成一系列曲线（因为该函数将 x 作为 y 的函数），但我没有得到任何结果或明显不正确的函数。您需要做一些特别的事情来绘制这些函数的图吗？这是我尝试的代码：
Clear[T, g, k, f, r, a, b, term]; T = 170 Degree;
f[s_, d_] = Normal[Series[Tan[T - ArcCos[-(d*s)]], {s, 0, 4}]];
r[h_, d_] = Simplify[Integrate[f[s, d], {s, 0, h}]];
a[h_] = Table[r[h, d], {d, 1, 3, 1}]
b[h_] = Table[-h, {Dimensions[a[h]][[1]]}];
ParametricPlot[{a[h], b[h]}, {h, 0, 100}, AspectRatio -> 1]
（注意：y 轴是倒置的。我在这里尝试制作 2 个具有匹配尺寸的列表，但没有效果。处理这个问题的最简单方法就是使 y 参数方程反转，因为它不容易反转Mathematica 中的轴）