matlab求切平面及法线方程;绘制该椭球面及其切平面及法线的图形.求旋转椭圆球面3x^2+y^2+z^2=16在点(-1,-2,3)处的切平面及法线方程;绘制该椭球面及其切平面及法线的图形.五分钟之内,急

来源:学生作业帮助网 编辑:作业帮 时间:2024/05/04 07:13:57

matlab求切平面及法线方程;绘制该椭球面及其切平面及法线的图形.求旋转椭圆球面3x^2+y^2+z^2=16在点(-1,-2,3)处的切平面及法线方程;绘制该椭球面及其切平面及法线的图形.五分钟之内,急
matlab求切平面及法线方程;绘制该椭球面及其切平面及法线的图形.
求旋转椭圆球面3x^2+y^2+z^2=16在点(-1,-2,3)处的切平面及法线方程;绘制该椭球面及其切平面及法线的图形.
五分钟之内,急

matlab求切平面及法线方程;绘制该椭球面及其切平面及法线的图形.求旋转椭圆球面3x^2+y^2+z^2=16在点(-1,-2,3)处的切平面及法线方程;绘制该椭球面及其切平面及法线的图形.五分钟之内,急
syms x y z;
F=3*x^2+y^2+z^2-16;
nv=jacobian(F,[x y z]);
[x,y,z]=sphere;
mesh(4/sqrt(3)*x,4*y,4*z);%椭圆
x=-1;y=-2;z=3;
nv=double(subs(nv));
hold on
quiver3(x,y,z,nv(1),nv(2),nv(3),.5);%法向量
t=-1:.5:1;
[xx,yy]=meshgrid(t+x,t+y);
zz=-(nv(1)*(xx-x)+nv(2)*(yy-y))/nv(3)+z;
mesh(xx,yy,zz);%切平面
xlabel('x');ylabel('y');zlabel('z');
axis equal;