Mathematicaの関数テーブルのパラメトリックプロットはどうやって作るのですか？

Question

私はパラメトリックプロットで曲線のファミリを生成しようとしています（この関数はxの関数としてxを与えているので）。あなたはそのような機能のプロットを作るために必要な特別なものがありますか？これは私の未遂コードです：注意

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で軸）

Answer 1

を反転することは容易ではないので、おそらく、この欲しい：

ParametricPlot[Transpose[{a[h], b[h]}], {h, 0, 100}, AspectRatio -> 1] 

を