Mathematica で2元4次連立方程式を解くには・・・
教えて下さい!
2元4次連立方程式{f(x,y)=0, g(x,y)=0}
(関数fとgはxとyの4次方程式です。)について、
例えば、[x,-10,10]のような限定された範囲で
実数解(x,y)を
Mathematicaを使って、30桁精度で数値的に求め、
それをx,yの2次元プロットしたいと思っております。
Mathematica のどのような関数を組み合わせれば
これができるか、ご教示下さいませんでしょうか?
よろしくお願いいたします。
(自分でC言語でプログラムした場合、解けるには解け
るのですが、有効数字の桁数が十分でなく、部分的に
数値が丸まってしまい、プロットがとぎれてしまう問題
があったので、有効数字を自在に調節できるMathematica
でやってみようと思ったのですが、例えば、安直に
Plot[N[Solve[{f == 0, g == 0}], 30], {x, -10, 10, 0.01}]
としてもダメでした。NRootなども検討しましたがうまく
行きません。)
お礼
ありがとうございました
補足
ありがとうございます。 おっしゃるようにやってみましたが、4桁とか10桁とかにすると、 5桁表示するんですけど。ちなみに開平法でやるにはどうしたら いいんでしょうか?