• ベストアンサー

Mathematicaでグラフの書き方教えてください

Mathematicaで下記の二つの式をグラフで書きたいのですが、Mathematica初心者なものでいまいちわかりません。勉強するにも時間がないので焦っています。どうか分かる方おしえてください。 ・7x^2-22xy+7y^2=18 ・11x^2-14xy+11y^2=18

質問者が選んだベストアンサー

  • ベストアンサー
回答No.2

陰関数表示は << Graphics`ImplicitPlot` としてから, ImplicitPlot[7x^2-22x y+7y^2==18, {x, -2, 2}] ImplicitPlot[11x^2-14x y+11y^2==18, {x, -2, 2}] などとすれば表示されます.言わずもがなでしょうが,xy は x y,= は == としてね. 上は双曲線,下は楕円ですね.

punipuyo
質問者

お礼

勉強不足ですみませんでした^^とても助かりましたありがとうございました!

その他の回答 (1)

  • 05062412
  • ベストアンサー率13% (53/387)
回答No.1

たぶん、 Plot[書きたい式,{定義域}] でいいと思います。 例) sinxを-π<x<πの範囲でプロットするときは、 Plot[Sin[x],{x,-Pi,Pi}] と書きます。