next up previous
Next: 8.1.5 パラメーター曲面 Up: 8.1.4 陰関数曲線 (平面内の) Previous: 8.1.4 陰関数曲線 (平面内の)

8.1.4.1 バッドノウハウ?

次の例では, $ \cos m\pi x\cos n\pi y+\cos n\pi x\cos m\pi y=0$ を描こうとしていて,本当は
plus[m_, n_] := 
 ContourPlot[
  Cos[m*Pi*x]* Cos[n*Pi*y] + Cos[n*Pi*x]*Cos[m*Pi*y]==0,
  {x, 0, 1}, {y, 0, 1},
  BoundaryStyle -> Black, Frame -> None, PlotPoints -> 100]
で出来るかと考えたが,なぜか境界 (正方形) が描かれなかったので, $ \cos m\pi x\cos n\pi y+\cos n\pi x\cos m\pi y=0$ の等高線 (高さ 0 のもののみ) を描かせている。
plus[m_, n_] := 
 ContourPlot[
  Cos[m*Pi*x]* Cos[n*Pi*y] + Cos[n*Pi*x]*Cos[m*Pi*y],
  {x, 0, 1}, {y, 0, 1},
  BoundaryStyle -> Black, Frame -> None, Contours -> {0}, 
  ContourShading -> None, ContourStyle -> Thickness[0.002], 
  PlotPoints -> 100]

(これは某学生の修士論文に掲載する図を作成するプログラムなので, オプションの指定が結構細かい。検討すると得るところがあると思う。)


next up previous
Next: 8.1.5 パラメーター曲面 Up: 8.1.4 陰関数曲線 (平面内の) Previous: 8.1.4 陰関数曲線 (平面内の)
桂田 祐史
2013-04-09