〓 Mathematica 2 〓
■ このスレッドは過去ログ倉庫に格納されています
0646132人目の素数さん
NGNGx^2+2y^2-4=0 のグラフを重ねて描きたいのですがどうしたらよいでしょうか。
ContourPlot[(x - 2 y + 2) (4 x - y - 4), {x, -10, 10}, {y, -10, 10},
Contours -> 15, PlotRange -> {-300, 100},
ColorFunction -> (Hue[# Log[1 + #]] &), PlotPoints -> 200]
ParametricPlot[{Sqrt[2] Sin[t], 2 Cos[t]}, {t, 0, 2Pi}]
■ このスレッドは過去ログ倉庫に格納されています