明经CAD社区

 找回密码
 注册

QQ登录

只需一步,快速开始

搜索
楼主: chlh_jd

lisp应用递归算法10题

    [复制链接]
发表于 2012-7-9 16:05:09 | 显示全部楼层
向高手们学习致敬!!!
发表于 2012-9-18 10:02:21 | 显示全部楼层
向高手们学习致敬!!!向钓鱼岛致敬!!!
发表于 2012-10-8 01:27:12 | 显示全部楼层
学习的好贴
发表于 2013-5-21 15:08:07 | 显示全部楼层
很值得学习,向高手致敬!!
发表于 2013-8-3 21:32:31 | 显示全部楼层
支持
发表于 2014-5-4 22:54:12 | 显示全部楼层
出个题目:
数表由很多根pl线的顶点坐标组成的
一条pl线每段的两个坐标一个元素,第1段和第2段有关系,第2段和第3段有关系,
就是要把每根pl线的坐标分成一组
发表于 2022-11-17 20:05:07 | 显示全部楼层
强大的递归
发表于 2022-12-2 19:37:06 | 显示全部楼层
本帖最后由 qjchen 于 2022-12-2 19:51 编辑
hnfsf 发表于 2014-5-4 22:54
出个题目:
数表由很多根pl线的顶点坐标组成的
一条pl线每段的两个坐标一个元素,第1段和第2段有关系,第 ...

对于单根PL线的,可以如此

(setq a (list (list 1 2) (list 2 3) (list 3 4) (list 4 5)))

(mapcar '(lambda (x y) (list x y)) (reverse (cdr (reverse a))) (cdr a))

不过估计我可能不太看得懂题意
您需要登录后才可以回帖 登录 | 注册

本版积分规则

小黑屋|手机版|CAD论坛|CAD教程|CAD下载|联系我们|关于明经|明经通道 ( 粤ICP备05003914号 )  
©2000-2023 明经通道 版权所有 本站代码,在未取得本站及作者授权的情况下,不得用于商业用途

GMT+8, 2024-11-22 15:15 , Processed in 0.171698 second(s), 18 queries , Gzip On.

Powered by Discuz! X3.4

Copyright © 2001-2021, Tencent Cloud.

快速回复 返回顶部 返回列表