输入关键词搜索资料
分享
首 页
个人中心
意见反馈
帮助中心
首页 >
高等教育 >
其他高等教育
扭带的动画
2012-04-29
22页
ppt
18MB
39阅读
is_353638
暂无简介
举报
扭带的动画nullnull扭 带 Maple 动画null设Γ是一条平面或空间曲线。另一条长为h的线段与曲线垂直相交,且交点在曲线上移动。与此同时,该线段又在曲线Γ的法平面上以一定的速度旋转。这条运动的线段形成一条宽度为 h 的扭带(Twisted Ribbon)。 本课件给出扭带的参数方程,并用数学软件Maple绘出图形和动画。nullnull例1with(plots): with(linalg): a:=4: r:=t-> ; x(t):=r(t)[1]:y(t):=r(t)[2]:z(t):=r(t)[3]: T(t):=; ...
nullnull扭 带 Maple 动画null设Γ是一条平面或空间曲线。另一条长为h的线段与曲线垂直相交,且交点在曲线上移动。与此同时,该线段又在曲线Γ的法平面上以一定的速度旋转。这条运动的线段形成一条宽度为 h 的扭带(Twisted Ribbon)。 本课件给出扭带的参数方程,并用数学软件Maple绘出图形和动画。nullnull例1with(plots): with(linalg): a:=4: r:=t->
; x(t):=r(t)[1]:y(t):=r(t)[2]:z(t):=r(t)[3]: T(t):=
; Q(t):=
; n(t):=normalize(crossprod(T(t),Q(t))); m(t):=normalize(crossprod(T(t),n(t))); h:=2;k:=1;p:=1; X(s,t):=cos(p*t)*s-sin(p*t)*k*s; Y(s,t):=sin(p*t)*s+cos(p*t)*k*s; x(s,t):=r(t)[1]+X(s,t)*m(t)[1]+Y(s,t)*n(t)[1]; y(s,t):=r(t)[2]+X(s,t)*m(t)[2]+Y(s,t)*n(t)[2]; z(s,t):=r(t)[3]+X(s,t)*m(t)[3]+Y(s,t)*n(t)[3]; qumian:=plot3d([x(s,t),y(s,t),z(s,t)],s=-h/2..h/2,t=0..2*Pi,style=patch,lightmodel=light2,grid=[10,66]): x_axis:=plot3d([u,0,0],u=-3..3,v=0..0.01): y_axis:=plot3d([0,u,0],u=-3..3,v=0..0.01): z_axis:=plot3d([0,0,u],u=-2..2,v=0..0.01): xyz:=display(x_axis,y_axis,z_axis,thickness=3): display(qumian,xyz,scaling=constrained,orientation=[-150,50]);圆nullwith(plots): with(linalg): a:=4: r:=t->
; x(t):=r(t)[1]:y(t):=r(t)[2]:z(t):=r(t)[3]: T(t):=
: Q(t):=
: n(t):=normalize(crossprod(T(t),Q(t))): m(t):=normalize(crossprod(T(t),n(t))): h:=2;k:=1;p:=1; X(s,t):=cos(p*t)*s-sin(p*t)*k*s: Y(s,t):=sin(p*t)*s+cos(p*t)*k*s: x(s,t):=r(t)[1]+X(s,t)*m(t)[1]+Y(s,t)*n(t)[1]: y(s,t):=r(t)[2]+X(s,t)*m(t)[2]+Y(s,t)*n(t)[2]: z(s,t):=r(t)[3]+X(s,t)*m(t)[3]+Y(s,t)*n(t)[3]: K:=60: for i from 1 to K do ti:=i*2.2*Pi/K: qumian[i]:=plot3d([x(s,t),y(s,t),z(s,t)],s=-h/2..h/2,t=0..ti,style=patch,lightmodel=light2,grid=[10,60]): quxian1[i]:=plot3d([x(s,t),y(s,t),z(s,t)],s=-h/2-0.1..-h/2,t=0..ti,color=red,grid=[2,60]): quxian2[i]:=plot3d([x(s,t),y(s,t),z(s,t)],s=h/2..h/2+0.1,t=0..ti,color=red,grid=[2,60]):od: qumian:=display(seq(qumian[i],i=1..K),insequence=true): quxian1:=display(seq(quxian1[i],i=1..K),insequence=true): quxian2:=display(seq(quxian2[i],i=1..K),insequence=true): x_axis:=plot3d([u,0,0],u=-3..3,v=0..0.01): y_axis:=plot3d([0,u,0],u=-3..3,v=0..0.01): z_axis:=plot3d([0,0,u],u=-2..2,v=0..0.01): xyz:=display(x_axis,y_axis,z_axis,thickness=3): display(quxian1,quxian2,qumian,xyz,scaling=constrained,orientation=[-150,50]);动画 2012.4.23null例2 with(plots): with(linalg): a:=2: r:=t->
; x(t):=r(t)[1]:y(t):=r(t)[2]:z(t):=r(t)[3]: T(t):=
; Q(t):=
; n(t):=normalize(crossprod(T(t),Q(t))); m(t):=normalize(crossprod(T(t),n(t))); h:=2;k:=1;p:=1/2; X(s,t):=cos(p*t)*s-sin(p*t)*k*s; Y(s,t):=sin(p*t)*s+cos(p*t)*k*s; x(s,t):=r(t)[1]+X(s,t)*m(t)[1]+Y(s,t)*n(t)[1]; y(s,t):=r(t)[2]+X(s,t)*m(t)[2]+Y(s,t)*n(t)[2]; z(s,t):=r(t)[3]+X(s,t)*m(t)[3]+Y(s,t)*n(t)[3]; qumian:=plot3d([x(s,t),y(s,t),z(s,t)],s=-h/2..h/2,t=0..2*Pi,style=patch,lightmodel=light2,grid=[10,66]): x_axis:=plot3d([u,0,0],u=-3..3,v=0..0.01): y_axis:=plot3d([0,u,0],u=-3..3,v=0..0.01): z_axis:=plot3d([0,0,u],u=-2..2,v=0..0.01): xyz:=display(x_axis,y_axis,z_axis,thickness=3): display(qumian,xyz,scaling=constrained,orientation=[-100,50]);圆莫比乌斯带(单侧曲面)nullwith(plots): with(linalg): a:=2: r:=t->
; x(t):=r(t)[1]:y(t):=r(t)[2]:z(t):=r(t)[3]: T(t):=
: Q(t):=
: n(t):=normalize(crossprod(T(t),Q(t))): m(t):=normalize(crossprod(T(t),n(t))): h:=1;k:=1;p:=1/2: X(s,t):=cos(p*t)*s-sin(p*t)*k*s: Y(s,t):=sin(p*t)*s+cos(p*t)*k*s: x(s,t):=r(t)[1]+X(s,t)*m(t)[1]+Y(s,t)*n(t)[1]: y(s,t):=r(t)[2]+X(s,t)*m(t)[2]+Y(s,t)*n(t)[2]: z(s,t):=r(t)[3]+X(s,t)*m(t)[3]+Y(s,t)*n(t)[3]: K:=60: for i from 1 to K do ti:=i*2.2*Pi/K: qumian[i]:=plot3d([x(s,t),y(s,t),z(s,t)],s=-h/2..h/2,t=0..ti,style=patch,lightmodel=light2,grid=[10,60]): quxian1[i]:=plot3d([x(s,t),y(s,t),z(s,t)],s=-h/2-0.1..-h/2,t=0..ti,color=red,grid=[2,60]): quxian2[i]:=plot3d([x(s,t),y(s,t),z(s,t)],s=h/2..h/2+0.1,t=0..ti,color=red,grid=[2,60]):od: qumian:=display(seq(qumian[i],i=1..K),insequence=true): quxian1:=display(seq(quxian1[i],i=1..K),insequence=true): quxian2:=display(seq(quxian2[i],i=1..K),insequence=true): x_axis:=plot3d([u,0,0],u=-3..3,v=0..0.01): y_axis:=plot3d([0,u,0],u=-3..3,v=0..0.01): z_axis:=plot3d([0,0,u],u=-2..2,v=0..0.01): xyz:=display(x_axis,y_axis,z_axis,thickness=3): display(quxian1,quxian2,qumian,xyz,scaling=constrained,orientation=[-150,50]);动画 2012.4.23nullwith(plots): with(linalg): a:=2: r:=t->
; x(t):=r(t)[1]:y(t):=r(t)[2]:z(t):=r(t)[3]: T(t):=
: Q(t):=
: n(t):=normalize(crossprod(T(t),Q(t))): m(t):=normalize(crossprod(T(t),n(t))): h:=1;k:=1;p:=1/2: X(s,t):=cos(p*t)*s-sin(p*t)*k*s: Y(s,t):=sin(p*t)*s+cos(p*t)*k*s: x(s,t):=r(t)[1]+X(s,t)*m(t)[1]+Y(s,t)*n(t)[1]: y(s,t):=r(t)[2]+X(s,t)*m(t)[2]+Y(s,t)*n(t)[2]: z(s,t):=r(t)[3]+X(s,t)*m(t)[3]+Y(s,t)*n(t)[3]: K:=60: for i from 1 to K do ti:=i*3*Pi/K: qumian[i]:=plot3d([x(s,t),y(s,t),z(s,t)],s=-h/2..h/2,t=0..ti,style=patchnogrid,lightmodel=light2): quxian1[i]:=plot3d([x(s,t),y(s,t),z(s,t)],s=-h/2-0.1..-h/2,t=0..ti,color=red,style=patchnogrid,lightmodel=light2): quxian2[i]:=plot3d([x(s,t),y(s,t),z(s,t)],s=h/2..h/2+0.1,t=0..ti,color=red,style=patchnogrid,lightmodel=light2):od: qumian:=display(seq(qumian[i],i=1..K),insequence=true): quxian1:=display(seq(quxian1[i],i=1..K),insequence=true): quxian2:=display(seq(quxian2[i],i=1..K),insequence=true): x_axis:=plot3d([u,0,0],u=-3..3,v=0..0.01): y_axis:=plot3d([0,u,0],u=-3..3,v=0..0.01): z_axis:=plot3d([0,0,u],u=-2..2,v=0..0.01): xyz:=display(x_axis,y_axis,z_axis,thickness=3): display(quxian1,quxian2,qumian,xyz,scaling=constrained,orientation=[-150,50]);动画 2012.4.23nullwith(plots): with(linalg): a:=2: r:=t->
; x(t):=r(t)[1]:y(t):=r(t)[2]:z(t):=r(t)[3]: T(t):=
: Q(t):=
: n(t):=normalize(crossprod(T(t),Q(t))): m(t):=normalize(crossprod(T(t),n(t))): h:=1;k:=1;p:=1/2: X(s,t):=cos(p*t)*s-sin(p*t)*k*s: Y(s,t):=sin(p*t)*s+cos(p*t)*k*s: x(s,t):=r(t)[1]+X(s,t)*m(t)[1]+Y(s,t)*n(t)[1]: y(s,t):=r(t)[2]+X(s,t)*m(t)[2]+Y(s,t)*n(t)[2]: z(s,t):=r(t)[3]+X(s,t)*m(t)[3]+Y(s,t)*n(t)[3]: K:=120: for i from 1 to K do ti:=i*3*Pi/K: qumian[i]:=plot3d([x(s,t),y(s,t),z(s,t)],s=-h/2..h/2,t=0..ti,style=patch,lightmodel=light2,grid=[10,60]): zhixian[i]:=plot3d([x(s,t),y(s,t),z(s,t)],s=-h..h,t=ti-0.01..ti+0.01,color=blue):od: qumian:=display(seq(qumian[i],i=1..K),insequence=true): zhixian:=display(seq(zhixian[i],i=1..K),insequence=true): x_axis:=plot3d([u,0,0],u=-3..3,v=0..0.01): y_axis:=plot3d([0,u,0],u=-3..3,v=0..0.01): z_axis:=plot3d([0,0,u],u=-2..2,v=0..0.01): xyz:=display(x_axis,y_axis,z_axis,thickness=3): display(zhixian,qumian,xyz,scaling=constrained,orientation=[-150,50]);动画 2012.4.23null例3with(plots): with(linalg): a:=4: r:=t->
; x(t):=r(t)[1]:y(t):=r(t)[2]:z(t):=r(t)[3]: T(t):=
; Q(t):=
; n(t):=normalize(crossprod(T(t),Q(t))); m(t):=normalize(crossprod(T(t),n(t))); h:=2;k:=1;p:=1.5; X(s,t):=cos(p*t)*s-sin(p*t)*k*s; Y(s,t):=sin(p*t)*s+cos(p*t)*k*s; x(s,t):=r(t)[1]+X(s,t)*m(t)[1]+Y(s,t)*n(t)[1]; y(s,t):=r(t)[2]+X(s,t)*m(t)[2]+Y(s,t)*n(t)[2]; z(s,t):=r(t)[3]+X(s,t)*m(t)[3]+Y(s,t)*n(t)[3]; qumian:=plot3d([x(s,t),y(s,t),z(s,t)],s=-h/2..h/2,t=0..2*Pi,style=patch,lightmodel=light2,grid=[10,66]): x_axis:=plot3d([u,0,0],u=-3..3,v=0..0.01): y_axis:=plot3d([0,u,0],u=-3..3,v=0..0.01): z_axis:=plot3d([0,0,u],u=-2..2,v=0..0.01): xyz:=display(x_axis,y_axis,z_axis,thickness=3): display(qumian,xyz,scaling=constrained,orientation=[-100,50]);圆null> with(plots): with(linalg): a:=4: r:=t->
; x(t):=r(t)[1]:y(t):=r(t)[2]:z(t):=r(t)[3]: T(t):=
: Q(t):=
: n(t):=normalize(crossprod(T(t),Q(t))): m(t):=normalize(crossprod(T(t),n(t))): h:=2;k:=1;p:=3/2: X(s,t):=cos(p*t)*s-sin(p*t)*k*s: Y(s,t):=sin(p*t)*s+cos(p*t)*k*s: x(s,t):=r(t)[1]+X(s,t)*m(t)[1]+Y(s,t)*n(t)[1]: y(s,t):=r(t)[2]+X(s,t)*m(t)[2]+Y(s,t)*n(t)[2]: z(s,t):=r(t)[3]+X(s,t)*m(t)[3]+Y(s,t)*n(t)[3]: K:=120: for i from 1 to K do ti:=i*3*Pi/K: qumian[i]:=plot3d([x(s,t),y(s,t),z(s,t)],s=-h/2..h/2,t=0..ti,style=patchnogrid,lightmodel=light2): quxian1[i]:=plot3d([x(s,t),y(s,t),z(s,t)],s=-h/2-0.1..-h/2,t=0..ti,color=red,style=patchnogrid,lightmodel=light2): quxian2[i]:=plot3d([x(s,t),y(s,t),z(s,t)],s=h/2..h/2+0.1,t=0..ti,color=red,style=patchnogrid,lightmodel=light2):od: qumian:=display(seq(qumian[i],i=1..K),insequence=true): quxian1:=display(seq(quxian1[i],i=1..K),insequence=true): quxian2:=display(seq(quxian2[i],i=1..K),insequence=true): x_axis:=plot3d([u,0,0],u=-3..3,v=0..0.01): y_axis:=plot3d([0,u,0],u=-3..3,v=0..0.01): z_axis:=plot3d([0,0,u],u=-2..2,v=0..0.01): xyz:=display(x_axis,y_axis,z_axis,thickness=3): display(quxian1,quxian2,qumian,xyz,scaling=constrained,orientation=[-150,50]);动画 2012.4.23nullwith(plots): with(linalg): a:=4: r:=t->
; x(t):=r(t)[1]:y(t):=r(t)[2]:z(t):=r(t)[3]: T(t):=
: Q(t):=
: n(t):=normalize(crossprod(T(t),Q(t))): m(t):=normalize(crossprod(T(t),n(t))): h:=2;k:=1;p:=3/2: X(s,t):=cos(p*t)*s-sin(p*t)*k*s: Y(s,t):=sin(p*t)*s+cos(p*t)*k*s: x(s,t):=r(t)[1]+X(s,t)*m(t)[1]+Y(s,t)*n(t)[1]: y(s,t):=r(t)[2]+X(s,t)*m(t)[2]+Y(s,t)*n(t)[2]: z(s,t):=r(t)[3]+X(s,t)*m(t)[3]+Y(s,t)*n(t)[3]: K:=120: for i from 1 to K do ti:=i*3*Pi/K: qumian[i]:=plot3d([x(s,t),y(s,t),z(s,t)],s=-h/2..h/2,t=0..ti,style=patch,lightmodel=light2,grid=[10,60]): zhixian[i]:=plot3d([x(s,t),y(s,t),z(s,t)],s=-h..h,t=ti-0.01..ti+0.01,color=blue):od: qumian:=display(seq(qumian[i],i=1..K),insequence=true): zhixian:=display(seq(zhixian[i],i=1..K),insequence=true): x_axis:=plot3d([u,0,0],u=-3..3,v=0..0.01): y_axis:=plot3d([0,u,0],u=-3..3,v=0..0.01): z_axis:=plot3d([0,0,u],u=-2..2,v=0..0.01): xyz:=display(x_axis,y_axis,z_axis,thickness=3): display(zhixian,qumian,xyz,scaling=constrained,orientation=[-150,50]);动画 2012.4.23null例4with(plots): with(linalg): a:=4: r:=t->
; x(t):=r(t)[1]:y(t):=r(t)[2]:z(t):=r(t)[3]: T(t):=
; Q(t):=
; n(t):=normalize(crossprod(T(t),Q(t))); m(t):=normalize(crossprod(T(t),n(t))); h:=2;k:=1;p:=3; X(s,t):=cos(p*t)*s-sin(p*t)*k*s; Y(s,t):=sin(p*t)*s+cos(p*t)*k*s; x(s,t):=r(t)[1]+X(s,t)*m(t)[1]+Y(s,t)*n(t)[1]; y(s,t):=r(t)[2]+X(s,t)*m(t)[2]+Y(s,t)*n(t)[2]; z(s,t):=r(t)[3]+X(s,t)*m(t)[3]+Y(s,t)*n(t)[3]; qumian:=plot3d([x(s,t),y(s,t),z(s,t)],s=-h/2..h/2,t=0..2*Pi,style=patch,lightmodel=light2,grid=[10,66]): x_axis:=plot3d([u,0,0],u=-3..3,v=0..0.01): y_axis:=plot3d([0,u,0],u=-3..3,v=0..0.01): z_axis:=plot3d([0,0,u],u=-2..2,v=0..0.01): xyz:=display(x_axis,y_axis,z_axis,thickness=3): display(qumian,xyz,scaling=constrained,orientation=[130,50]);圆null例5with(plots): with(linalg): a:=4: r:=t->
; x(t):=r(t)[1]:y(t):=r(t)[2]:z(t):=r(t)[3]: T(t):=
; Q(t):=
; n(t):=normalize(crossprod(T(t),Q(t))); m(t):=normalize(crossprod(T(t),n(t))); h:=2;k:=0;p:=2; X(s,t):=cos(p*t)*s-sin(p*t)*k*s; Y(s,t):=sin(p*t)*s+cos(p*t)*k*s; x(s,t):=r(t)[1]+X(s,t)*m(t)[1]+Y(s,t)*n(t)[1]; y(s,t):=r(t)[2]+X(s,t)*m(t)[2]+Y(s,t)*n(t)[2]; z(s,t):=r(t)[3]+X(s,t)*m(t)[3]+Y(s,t)*n(t)[3]; qumian:=plot3d([x(s,t),y(s,t),z(s,t)],s=0..h,t=0..10,style=patch,lightmodel=light1,grid=[10,100]): x_axis:=plot3d([u,0,0],u=-3..3,v=0..0.01): y_axis:=plot3d([0,u,0],u=-3..3,v=0..0.01): z_axis:=plot3d([0,0,u],u=-2..40,v=0..0.01): xyz:=display(x_axis,y_axis,z_axis,thickness=3): display(qumian,xyz,scaling=unconstrained,orientation=[30,50]);螺旋线null例7with(plots): with(linalg): a:=1: r:=t->
; x(t):=r(t)[1]:y(t):=r(t)[2]:z(t):=r(t)[3]: T(t):=
: Q(t):=
: n(t):=normalize(crossprod(T(t),Q(t))): m(t):=normalize(crossprod(T(t),n(t))): h:=3;k:=0;p:=1; X(s,t):=cos(p*t)*s-sin(p*t)*k*s: Y(s,t):=sin(p*t)*s+cos(p*t)*k*s: x(s,t):=r(t)[1]+X(s,t)*m(t)[1]+Y(s,t)*n(t)[1]: y(s,t):=r(t)[2]+X(s,t)*m(t)[2]+Y(s,t)*n(t)[2]: z(s,t):=r(t)[3]+X(s,t)*m(t)[3]+Y(s,t)*n(t)[3]: qumian:=plot3d([x(s,t),y(s,t),z(s,t)],s=-h/2..h/2,t=0..15,style=patch,lightmodel=light1,grid=[6,100]): x_axis:=plot3d([u,0,0],u=-3..3,v=0..0.01): y_axis:=plot3d([0,u,0],u=-3..3,v=0..0.01): z_axis:=plot3d([0,0,u],u=-2..20,v=0..0.01): xyz:=display(x_axis,y_axis,z_axis,thickness=3): display(qumian,xyz,scaling=constrained,orientation=[-50,70]); 圆锥螺线null例8with(plots): with(linalg): a:=2:b:=4: r:=t->
; x(t):=r(t)[1]:y(t):=r(t)[2]:z(t):=r(t)[3]: T(t):=
: Q(t):=
: n(t):=normalize(crossprod(T(t),Q(t))): m(t):=normalize(crossprod(T(t),n(t))): h:=2;k:=0;p:=2; X(s,t):=cos(p*t)*s-sin(p*t)*k*s: Y(s,t):=sin(p*t)*s+cos(p*t)*k*s: x(s,t):=r(t)[1]+X(s,t)*m(t)[1]+Y(s,t)*n(t)[1]: y(s,t):=r(t)[2]+X(s,t)*m(t)[2]+Y(s,t)*n(t)[2]: z(s,t):=r(t)[3]+X(s,t)*m(t)[3]+Y(s,t)*n(t)[3]: qumian:=plot3d([x(s,t),y(s,t),z(s,t)],s=-h/2..h/2,t=0..2*Pi,style=patch,lightmodel=light1,grid=[6,100]): x_axis:=plot3d([u,0,0],u=-3..3,v=0..0.01): y_axis:=plot3d([0,u,0],u=-3..3,v=0..0.01): z_axis:=plot3d([0,0,u],u=-2..2,v=0..0.01): xyz:=display(x_axis,y_axis,z_axis,thickness=3): display(qumian,xyz,scaling=constrained,orientation=[-50,70]);椭圆null例9with(plots): with(linalg): r:=t->
; x(t):=r(t)[1]:y(t):=r(t)[2]:z(t):=r(t)[3]: T(t):=
: Q(t):=
: n(t):=normalize(crossprod(T(t),Q(t))): m(t):=normalize(crossprod(T(t),n(t))): h:=1;k:=0;p:=1; X(s,t):=cos(p*t)*s-sin(p*t)*k*s: Y(s,t):=sin(p*t)*s+cos(p*t)*k*s: x(s,t):=r(t)[1]+X(s,t)*m(t)[1]+Y(s,t)*n(t)[1]: y(s,t):=r(t)[2]+X(s,t)*m(t)[2]+Y(s,t)*n(t)[2]: z(s,t):=r(t)[3]+X(s,t)*m(t)[3]+Y(s,t)*n(t)[3]: qumian:=plot3d([x(s,t),y(s,t),z(s,t)],s=-h..h,t=-3..3,style=patch,lightmodel=light1,grid=[6,100]): x_axis:=plot3d([u,0,0],u=-3..3,v=0..0.01): y_axis:=plot3d([0,u,0],u=-3..3,v=0..0.01): z_axis:=plot3d([0,0,u],u=-2..2,v=0..0.01): xyz:=display(x_axis,y_axis,z_axis,thickness=3): display(qumian,xyz,scaling=constrained,orientation=[-55,70]);nullnullnullnull例10with(plots): with(linalg): r:=t-> <0,t,t^2/10000>; x(t):=r(t)[1]:y(t):=r(t)[2]:z(t):=r(t)[3]: T(t):=
: Q(t):=
: n(t):=normalize(crossprod(T(t),Q(t))): m(t):=normalize(crossprod(T(t),n(t))): h:=1;k:=0;p:=1; X(s,t):=cos(p*t)*s-sin(p*t)*k*s: Y(s,t):=sin(p*t)*s+cos(p*t)*k*s: x(s,t):=r(t)[1]+X(s,t)*m(t)[1]+Y(s,t)*n(t)[1]: y(s,t):=r(t)[2]+X(s,t)*m(t)[2]+Y(s,t)*n(t)[2]: z(s,t):=r(t)[3]+X(s,t)*m(t)[3]+Y(s,t)*n(t)[3]: qumian:=plot3d([x(s,t),y(s,t),z(s,t)],s=-h..h,t=-5..5,style=patch,lightmodel=light1,grid=[6,100]): x_axis:=plot3d([u,0,0],u=-1..1,v=0..0.01): y_axis:=plot3d([0,u,0],u=-6..6,v=0..0.01): z_axis:=plot3d([0,0,u],u=-2..2,v=0..0.01): xyz:=display(x_axis,y_axis,z_axis,thickness=3): display(qumian,xyz,scaling=constrained,orientation=[-55,70]);本程序不适合直线(r 的二阶导数是零向量), 故在z上加一个很小的量,得近似直线。null例10with(plots): with(linalg): r:=t-> <0,t,t^2/10000>; x(t):=r(t)[1]:y(t):=r(t)[2]:z(t):=r(t)[3]: T(t):=
: Q(t):=
: n(t):=normalize(crossprod(T(t),Q(t))): m(t):=normalize(crossprod(T(t),n(t))): h:=1;k:=0;p:=1; X(s,t):=cos(p*t)*s-sin(p*t)*k*s: Y(s,t):=sin(p*t)*s+cos(p*t)*k*s: x(s,t):=r(t)[1]+X(s,t)*m(t)[1]+Y(s,t)*n(t)[1]: y(s,t):=r(t)[2]+X(s,t)*m(t)[2]+Y(s,t)*n(t)[2]: z(s,t):=r(t)[3]+X(s,t)*m(t)[3]+Y(s,t)*n(t)[3]: qumian:=plot3d([x(s,t),y(s,t),z(s,t)],s=-h..h,t=-6..8,style=patch,lightmodel=light3,grid=[6,100]): x_axis:=plot3d([u,0,0],u=-1..1,v=0..0.01): y_axis:=plot3d([0,u,0],u=-6..6,v=0..0.01): z_axis:=plot3d([0,0,u],u=-1..1,v=0..0.01): xyz:=display(x_axis,y_axis,z_axis,thickness=3): display(qumian,xyz,scaling=constrained,orientation=[50,50]);
/
本文档为【扭带的动画】,请使用软件OFFICE或WPS软件打开。作品中的文字与图均可以修改和编辑, 图片更改请在作品中右键图片并更换,文字修改请直接点击文字进行修改,也可以新增和删除文档中的内容。
[版权声明] 本站所有资料为用户分享产生,若发现您的权利被侵害,请联系客服邮件isharekefu@iask.cn,我们尽快处理。 本作品所展示的图片、画像、字体、音乐的版权可能需版权方额外授权,请谨慎使用。 网站提供的党政主题相关内容(国旗、国徽、党徽..)目的在于配合国家政策宣传,仅限个人学习分享使用,禁止用于任何广告和商用目的。
相关资料
中日JIS-GB钢管材料对照表
PEP五上语音发音总结
2022年中国南京市数字经济行业市场供需形势分析及投资前景评估报告(更新版)
会计与财务管理专业管理会计》补充习题2011。9新表格式
ERP系统原理和实施(第三版) 教学课件 ppt 作者 978-7-302-27536-7k ch02
莎士比亚经典语录英语(范本)
第5章 固定资产
(译文)改性大豆筴皮吸附剂对Pb2 的生物吸附性能研究
昆仑固件用户使用手册
景观设计完整ppt课件
墨西哥建筑师设计300米深“摩地大楼”-英语新闻-文化教育-
人法地漏尽通揭密
2009年全国粮食清仓查库-
胸部肿瘤疾病护理常规
孙子定理
学校外伤证明范文
社区城管主任个人述职报告
TSG T7004-2012(新版)液压电梯监督检验报告
新员工,邮件,主题 (3页)
开票信息范文
热门搜索
《中国教育史》孙培青版--1-16章配套习题
Droit des affaires----Partie 1 ..
乡镇党委委员任职条件 (8页)
(完整版)米字格模板Word
初三数学(中考复习)教学计划
YJK钢结构与PKPM对比
不同厂家甲硝唑片溶出曲线相似性考察
高一物理必修一第一章第二节-讲义
中国移动上网设置教程
《物流设施与设备》期末试卷A及答案
寝室卫生检查表
一年级前后鼻音练习题
[经济/管理]城乡建设环境保护部批准房屋修缮范围和标准
揭开SONY DVP—S7000DVD机的秘密
《中国教育史》孙培青版--1-16章配套习题
Droit des affaires----Partie 1 ..
乡镇党委委员任职条件 (8页)
(完整版)米字格模板Word
初三数学(中考复习)教学计划
YJK钢结构与PKPM对比
不同厂家甲硝唑片溶出曲线相似性考察
高一物理必修一第一章第二节-讲义
中国移动上网设置教程
《物流设施与设备》期末试卷A及答案
寝室卫生检查表
一年级前后鼻音练习题
[经济/管理]城乡建设环境保护部批准房屋修缮范围和标准
揭开SONY DVP—S7000DVD机的秘密
你可能还喜欢
课程设计--夹套发酵罐的设计
围墙工程施工合同
中国地震历史记录表
安徽省建设工程监理人员配备标准
光伏电站竣工验收报告
中国电信的服务营销分析--毕业论文doc
福建师范大学自考毕业论文答辩过程详解
手术切口的分类及感染诊断标准
船公司全称以及船运相关缩写
我国车用柴油国IV、国V标准、技术要求和试验方法 GB19147
富兰克林有句名言是这样说的:“为顾惜安全而放弃自由的人,既不配获得 ...
2019年IATF16949风险和机遇评估分析表
恶性高血压药历汇编
智邦国际ERP系统
惭愧学人资料合集
机械加工检验卡片
下肢深静脉血栓预防及护理ppt课件
下肢深静脉血栓预防及护理ppt课件
下肢深静脉血栓预防及护理ppt课件
下肢深静脉血栓预防及护理ppt课件
最新资料
资料动态
专题动态
搜索
热门搜索
离婚协议书
入党申请书
房屋租赁合同
贫困申请书
历史搜索
清空历史搜索