东华湖里的睡莲 发表于 2007-5-15 17:15

求基于分形几何的植物模拟MATLAB源代码

请各位大侠帮忙,在下感激不尽!

[ 本帖最后由 eight 于 2008-3-31 19:58 编辑 ]

1128556 发表于 2008-3-31 14:45

同求~~~~~~~~~~~~~~~~~

sogooda 发表于 2008-3-31 15:23

看看下面这个吧
转载自紫丁香bbsmatlab版主秋天的萝卜个人blog。function leaf_by_recursion(n);
% Renference:
% http://www.cnartla.com/shejililun/lilun/200508/71.html
% Author's emal:zjliu2001@163.com
%
if nargin==0;
   n=2;
end
close all;
hold on;
LRf(n,i,pi*0.4,1);
axis equal
function LRf(n,z,A,r);
q=0.85;
R=0.36*pi;
s=0.76;
sc=0.45;
ss=0.2;
zz=z;
for k=1:11;
   zz(k+1)=zz(k)+r*q^k*exp(i*A);
end
plot(zz);
rr=2*r;
for k=1:10;
   z1=zz(k+1)+rr*s^k*exp(i*(A+R));
   z2=zz(k+1)+rr*s^k*exp(i*(A-R));
   plot();
end
if n>0;
   for k=2:10;
       LRf(n-1,zz(k),A+R,r*sc*q^k);
       LRf(n-1,zz(k),A-R,r*sc*q^k);
       LRf(n-1,zz(k),A,r*ss*q^k);
   end
   LRf(n-1,zz(1),A,r/2*sc*q);
   LRf(n-1,zz(11),A,r*ss*q^10);
   
end

eight 发表于 2008-3-31 19:59

原帖由 东华湖里的睡莲 于 2007-5-15 17:15 发表 http://www.chinavib.com/forum/images/common/back.gif
请各位大侠帮忙,在下感激不尽! 标题不要用“菜鸟”这些字眼，内容不要使用多个相同的标点符号，更多的请看置顶的会员守则
页: [1]
查看完整版本: 求基于分形几何的植物模拟MATLAB源代码