📄 sierpinski_xj.asv
字号:
function sierpinski_4j(A,B,C,D,n)
if nargin==0
A=[0 0];B=[1 0];C=[1 1];D=[0 1];n=5;
end
axis equal off;
if n== 0
fill ([A(1), B(1), C(1) D(1)], [A(2), B(2), C(2) D(2)], [0.0 0.0 0.0]); %以黑色填充
hold on % 保持图形
else
sierpinski(A, (A + B)/3, (A + C)/3, (A + D)/3,n-1);
sierpinski((A + B)/3, 2*(B + A)/2, (A + C)/3,(A + D)/3,n-1);
sierpinski(C, (C + A)/2, (C + B)/2, n-1);
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -