明经CAD社区's Archiver
社区
›
AutoLISP/Visual LISP 编程技术
› 等长度表元素穿插合并
gaics
发表于 2023-6-1 16:55:49
等长度表元素穿插合并
有两个等长度的表,将其元素穿插合并:
_$ (apply 'append (mapcar'(lambda(x y)(list x y))'(1 2 3)'(a b c)))
(1 A 2 B 3 C)
给表中的每一个元素前面插入一个元素:
_$ (apply 'append (mapcar'(lambda(x)(list "n" x))'(1 2 3)))
("n" 1 "n" 2 "n" 3)
明_明
发表于 2023-6-3 14:37:31
感谢分享!挺好用的!
页:
[1]
查看完整版本:
等长度表元素穿插合并