用maple做球(需要动画过程)
请教各位大虾:怎么用maple编个程序,能够完整显示球的生成过程开始图形是一条直径和一条圆弧,弧绕着直径旋转得到球。
谢谢大家指教!!! 还不会用maple做动画. 是一个用MAPLE的程序啊!!不算动画! 你程序中肯定要用到动画了. 你去看一下,有一本书全部是讲maple做动画的 程序中是要用到动画,呵呵!!
什么书啊?能介绍下吗? 《Maple的图形动画技术》
作 者:张晓丹等
出版社:北京航空航天大学出版社 with(plots):#本版本可在Maple 10 和Maple 11中运行
r:=spacecurve():
for i from 1 to 50 do
phi:=i*Pi/25:
r:=plot3d(1,t=0..phi,s=0..Pi,coords=spherical):
od:
for j from 0 to 50 do
Q:=spacecurve(,t=-1.5..1.5):
od:
for k from 0 to 50 do
R:=display(r,Q):
od:
display(,i=0..50)],scaling=constrained,insequence=true,lightmodel=light3,axes=normal);
[ 本帖最后由 suffer 于 2007-6-15 09:41 编辑 ] 原帖由 东方后 于 2007-6-14 20:59 发表 http://www.chinavib.com/forum/images/common/back.gif
> with(plots):#本版本可在Maple 10 和Maple 11中运行
> r:=spacecurve():
> for i from 1 to 50 do
> phi:=i*Pi/25:
> r:=plot3d(1,t=0..phi,s=0..Pi,coords=spherical):
...
Error, (in display) first argument must be a plot structure or list, set or array of plot structures
Error, (in display) first argument must be a plot structure or list, set or array of plot structures 仔细检查了一下,原来搂主的代码被论坛解析掉了,现在已经修正
建议大家以后发代码的时候用code引用
with(plots):#本版本可在Maple 10 和Maple 11中运行
r:=spacecurve():
for i from 1 to 50 do
phi:=i*Pi/25:
r:=plot3d(1,t=0..phi,s=0..Pi,coords=spherical):
od:
for j from 0 to 50 do
Q:=spacecurve(,t=-1.5..1.5):
od:
for k from 0 to 50 do
R:=display(r,Q):
od:
display(,i=0..50)],scaling=constrained,insequence=true,lightmodel=light3,axes=normal);
页:
[1]