分形之希尔伯特-皮亚诺(Hilbert-Peano)曲线

      1890年,意大利数学家皮亚诺(Peano G)发明能填满一个正方形的曲线,叫做皮亚诺曲线。后来,由希尔伯特作出了这条曲线,又名希尔伯特曲线。Hilbert-Peano曲线是一种分形图形,它可以画得无限复杂。它的初始图元是正方形,在迭代生成的过程中,不断细化出小的正方形,图中的线段其实是用于连接各正方形的连线。它的特点是蜿蜒曲折、一气呵成,能经过平面上某一正方形区域内所有的点。希尔伯特曲线是一种奇妙的曲线,只要恰当选择函数,画出一条连续的参数曲线,当参数t在0,1区间取值时,曲线将遍历单位正方形中所有的点,得到一条充满空间的曲线。 希尔伯特曲线是一条连续而又不可导的曲线。

软件截图:

软件下载地址:http://files.cnblogs.com/WhyEngine/Fractal.7z

  • 0
    点赞
  • 3
    收藏
    觉得还不错? 一键收藏
  • 0
    评论
绘制Peano曲线和Koch曲线可以使用MATLAB中的绘图函数进行实现,下面是详细的代码实现: 1. 绘制Peano曲线 ```matlab % 定义绘制Peano曲线的函数 function PeanoCurve(n) % n为绘制的阶数 if n == 0 x = [0 1 1 2 2 3 3 2 2 1 1 0]; y = [0 0 1 1 0 0 1 1 2 2 1 1]; plot(x,y,'k'); else hold on; PeanoCurve(n-1); % 递归绘制子曲线 axis equal; % 设置坐标轴比例相等 x = get(gca,'Xtick'); y = get(gca,'Ytick'); set(gca,'XTick',[],'YTick',[]); % 隐藏坐标轴 x = [x(1) x x(end)]; y = [y(1) y y(end)]; % 添加边框 x1 = x(1:2:end); x2 = x(2:2:end); y1 = y(1:2:end); y2 = y(2:2:end); x = [x1;x2;x2;x1;x1]; y = [y1;y1;y2;y2;y1]; % 组合子曲线 plot(x,y,'k'); hold off; end end ``` 使用方法: ```matlab PeanoCurve(3); % 绘制3阶Peano曲线 ``` 2. 绘制Koch曲线 ```matlab % 定义绘制Koch曲线的函数 function KochCurve(n) % n为绘制的阶数 if n == 0 x = [0 1 1/2 1/2 1 1]; y = [0 0 sqrt(3)/2 sqrt(3) sqrt(3) 0]; plot(x,y,'k'); else hold on; KochCurve(n-1); % 递归绘制子曲线 axis equal; % 设置坐标轴比例相等 x = get(gca,'Xtick'); y = get(gca,'Ytick'); set(gca,'XTick',[],'YTick',[]); % 隐藏坐标轴 x = [x(1) x x(end)]; y = [y(1) y y(end)]; % 添加边框 x1 = x(1:2:end); x2 = x(2:2:end); y1 = y(1:2:end); y2 = y(2:2:end); x = [x1;(x1+x2)/2;(x1+x2)/2;(x2-x1)/2+x1;x2]; y = [y1;(y1+y2)/2;(y1+y2)/2;(y2-y1)/2+y1;y2]; % 组合子曲线 plot(x,y,'k'); hold off; end end ``` 使用方法: ```matlab KochCurve(3); % 绘制3阶Koch曲线 ```

“相关推荐”对你有帮助么?

  • 非常没帮助
  • 没帮助
  • 一般
  • 有帮助
  • 非常有帮助
提交
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值