matlab解答对一个等边三角形,每条边按照Koch曲线的方式进行迭代,产生的分形图称为Koch雪花.编制程序绘制出它的

来源：学生作业帮编辑：作业帮分类：综合作业时间：2024/10/01 22:58:52

matlab解答
对一个等边三角形,每条边按照Koch曲线的方式进行迭代,产生的分形图称为Koch雪花.编制程序绘制出它的图形,并计算Koch雪花的面积,以及它的分形维数.

把下面的程序保存为plotkoch.m,然后在command windows中输入plotkoch(8)即可,其中8是迭代次数,你可以换成别的整数.
function plotkoch(n)
[x,y]=koch(n);
fill(x,y,'w');
text(0,0,{'\centerline{The area surrounded by Koch Snow Curve is $\displaystyle\frac{2\sqrt {3}{n}^{2}}{5}$.}',...
'\centerline{($n$ is the side length of the original triangle.)}',...
'\centerline{The dimension of the curve is $\log{_34}$.}'},...
'interpreter','latex','horizontalalignment','center')
axis equal off;
function [x,y]=koch(n)
if n==1
t=linspace(0,2*pi,4);
x=cos(t);
y=sin(t);
else
p=1/3;h=p*sqrt(3)/2;
[x,y]=koch(n-1);
xx=x(1);yy=y(1);
dx=diff(x);dy=diff(y);
ax=(1-p)*x(1:end-1)+p*x(2:end);
ay=(1-p)*y(1:end-1)+p*y(2:end);
bx=p*x(1:end-1)+(1-p)*x(2:end);
by=p*y(1:end-1)+(1-p)*y(2:end);
ox=(x(1:end-1)+x(2:end))/2+h*dy;
oy=(y(1:end-1)+y(2:end))/2-h*dx;
x=[reshape([x(1:end-1);ax;ox;bx],1,[]),x(end)];
y=[reshape([y(1:end-1);ay;oy;by],1,[]),y(end)];
end

matlab解答对一个等边三角形,每条边按照Koch曲线的方式进行迭代,产生的分形图称为Koch雪花.编制程序绘制出它的 matlab绘制如下函数曲线的程序是什么自己设计一个回转体并在matlab中绘制出它表面的网格图,曲面图,并对其进行简单的颜色与光照处理. 牛顿迭代算法的matlab程序求大神帮助使用matlab绘制曲面时,这个程序为什么画出的是一条曲线,而不是一个曲面呢 matlab绘制两条曲线,如何获得这两个曲线的交点坐标? 用Matlab绘制函数曲线的问题. 用matlab绘制下面方程的曲线求用Mathematica绘制科赫雪花曲线的过程如何编制一个死循环的程序 mathematica 绘制出一个图形中多条曲线,怎么在每条曲线旁边添加文本注释? 在matlab中进行年降水小波分析的具体步骤或程序?急用,谢谢,怎么能绘制出最后的小波图