:Sierpinski㷨ͼ

ʽ:
ImageFromFractal2D(x,y,x0,y0,a,n,w,h)
ImageFromFractal2D(x,y,x0,y0,a,n,w)
ImageFromFractal2D(x,y,x0,y0,a,n)
ImageFromFractal2D(x,y,x0,y0,a)
ImageFromFractal2D(x,y,x0,y0)
ImageFromFractal2D(x,y,x0)
ImageFromFractal2D(x,y)

x:κ
y:
x0:㷨ѡȡһ,ĬΪĺ
y0:㷨ѡȡһ,ĬΪ
a:,ĬΪ0.5
n:,Ĭ100000
w:Ŀ,ֵΪ0,ĬΪ400
h:ĸ߶,ֵΪ0,Ĭwֵһ

ִгɹһw*hľ

:

//δʾһ9ͼ㷨
[x,y]=GetRegularPolygonXY(9);
a={min<\min>}(x);
x=x-a;
a={max<\max>}(x);
x=x*200/a;
a={min<\min>}(y);
y=y-a;
a={max<\max>}(y);
y=y*200/a;

f={ImageFromFractal2D<\ImageFromFractal2D>}(x,y,100,100,0.4,10000,200,200);//سõ


x={MeshGrid2<\MeshGrid2>}(0,200,201);
y=x';

f5={SmoothGrid<\SmoothGrid>}(f,5);
{cloud<\cloud>}(x,y,f5)//鿴ƽͼ

f1={ReplaceByCondition<\ReplaceByCondition>}(f,">",0,1);
{cloud<\cloud>}(x,y,f1)
