分形几何中一些经典图形的Matlab画法(共14页).doc

精选优质文档-倾情为你奉上分形几何中一些经典图形的Matlab画法（1）Koch曲线程序koch.mfunction koch(a1,b1,a2,b2,n)%koch(0,0,9,0,3)%a1,b1,a2,b2为初始线段两端点坐标,n为迭代次数a1=0;b1=0;a2=9;b2=0;n=3;%第i-1次迭代时由各条线段产生的新四条线段的五点横、纵坐标存储在数组A、B中A,B=sub_koch1(a1,b1,a2,b2);for i=1:n for j=1:length(A)/5; w=sub_koch2(A(1+5*(j-1):5*j),B(1+5*(j-1):5*j); for k=1:4 AA(5*4*(j-1)+5*(k-1)+1:5*4*(j-1)+5*(k-1)+5),BB(5*4*(j-1)+5*(k-1)+1:5*4*(j-1)+5*(k-1)+5)=sub_koch1(w(k,1),w(k,2),w(k,3),w(k,4);