蝴蝶曲线
2012-09-15 12:09:38| 分类：
高等数学图形动画
| 标签：
|举报
|字号大中小 订阅
with(plots):
curve:=polarplot(exp(cos(t))-2*cos(4*t)+sin(t/12)^5,t=1..50*Pi,numpoints=10000):
display(curve,scaling=constrained,title="Butterfly",tickmarks=[0,0]);
with(plots):
curve:=polarplot(exp(cos(t-Pi/2))-2*cos(4*(t-Pi/2))+sin((t-Pi/2)/12)^5,
t=1..60*Pi,color=blue,numpoints=10000):
display(curve,scaling=constrained,title="Butterfly",tickmarks=[0,0]);
with(plots):
r:=t->exp(cos(t))-2*cos(4*t)+sin(t/12)^5:
K:=300:for i from 1 to K do ti:=i*50*Pi/K:
curve[i]:=polarplot(r(t),t=0..ti,numpoints=3000*i/K) od:
curve:=display(seq(curve[i],i=1..K),insequence=true):
text:=textplot([0,3,"Butterfly"],color=grey):
display(curve,text,scaling=constrained,tickmarks=[6,6]);
参考资料：
评论这张
转发至微博
转发至微博
关闭
玩LOFTER，免费冲印20张照片，人人有奖！
我要抢>
<#--最新日志，群博日志-->
<#--推荐日志-->
<#--引用记录-->
<#--博主推荐-->
<#--随机阅读-->
<#--首页推荐-->
<#--历史上的今天-->
<#--被推荐日志-->
<#--上一篇，下一篇-->
<#-- 热度 -->
<#-- 网易新闻广告 -->
<#--右边模块结构-->
<#--评论模块结构-->
<#--引用模块结构-->
<#--博主发起的投票-->
评论