解析入門

例 4.6 陰関数 (p.110) 例 4.7 陰関数の微分 (p.110)

陰関数とその微分

Mathematica プログラム例

  1. Clear[f,x,y]
  2. f[x_,y_]:=x-y^2
  3. gr1=Plot3D[f[x,y],{x,-4,4},{y,-4,4}]
  4. gr2=Plot3D[0,{x,-4,4},{y,-4,4}]
  5. Show[{gr1,gr2}]
  6. <<Graphics`ImplicitPlot`
  7. ImplicitPlot[f[x,y]==0, {x,-4,4}]
  8. -Derivative[1,0][f][x,y]/Derivative[0,1][f][x,y]

計算結果