軌跡

２点からの距離の比が一定であるような点の軌跡を描こう。

これは、アポロニウスの円と呼ばれる図形である。

BP=k,\,AP=2kとおいてPを作図し，その軌跡を求めてみよう．

A: (Random[0, 1], Random[2, 3])
B: (Random[4, 5], Random[0, 1])
k = 2 (slider from 0.1 to 10, step 0.1)
c = Circle(A, (2 * k))
d = Circle(B, k)
P = Intersect(c, d, 1)
P' = Intersect(c, d, 2)
a = Segment(B, P)
b = Segment(A, P)
text1: "A" + (LaTeX[A]) + ",B" + (LaTeX[B]) + "に対して，AP:BP=2:1を満たす点Pの軌跡を求める．"