| ■19906 / inTopicNo.3) |
Re[1]: 数Ⅲ From 楕円 To アステロイド
|
□投稿者/ Houraku 一般人(1回)-(2006/12/10(Sun) 10:47:11)
 | アステロイド
f[x_, y_, k_] := x^2/k^2 + y^2/(1 - k)^2 - 1
f[x, y, t]
D[f[x, y, t], t]
-1 + x^2/t^2 + y^2/(1 - t)^2
-((2*x^2)/t^3) + (2*y^2)/(1 - t)^3
FullSimplify[Eliminate[{f[x, y, t] == 0,
D[f[x, y, t], t] == 0}, {t}]]
x^6 + 3*x^4*(-1 + y^2) + (-1 + y^2)^3 +
3*x^2*(1 + 7*y^2 + y^4) == 0
|
|
