f(x,y)=­õ(1-x^2-y^2) ¤È¤¹¤ë¡¥¶ÊÌÌ z=f(x,y) ¤ÎÅÀ (x,y,z)=(0.4,0.4,f(0.4,0.4)) ¤Ë¤ª¤±¤ëÀÜÊ¿ÌÌ

Mathematica ¥×¥í¥°¥é¥àÎã

1. f[x_,y_]:=Sqrt[1-x^2-y^2]
2. t[a_,b_]:=Derivative[1,0][f][a,b](x-a)+Derivative[0,1][f][a,b](y-b)+f[a,b]
3. gr1=Plot3D[f[x,y], {x, -0.3, 0.7}, {y, -0.3, 0.7}]
4. gr2=Plot3D[t[0.4,0.4], {x, 0.2, 0.6}, {y, 0.2, 0.6}]
5. Show[{gr1, gr2},ViewPoint->{2, -2.2, 1.5}]

·×»»·ë²Ì