ggggghhhhh 发表于 2013-2-2 19:17:39

请问串列如何实现三行内容资料排序

(setq mylist ' ((8 4 6)(2 0 8) (5 5 8) (6 4 2) (6 4 1))

如何让排序的方式是依序一项、二项、三项排序
((2 0 8)(5 5 8)(6 4 1)(6 4 2)(8 4 6))

请教各位高手了!谢谢!


cable2004 发表于 2013-2-2 19:31:11

本帖最后由 cable2004 于 2013-2-2 20:43 编辑

占沙发!
占沙发!

Gu_xl 发表于 2013-2-2 20:33:31

本帖最后由 Gu_xl 于 2013-2-2 20:33 编辑

(vl-sortmylist'(lambda (a b) (if (= (car a) (car b)) (if (= (cadr a) (cadr b)) (< (caddr a) (caddr b)) (< (cadr a) (cadr b))) (< (car a) (car b)) )))

ggggghhhhh 发表于 2013-2-3 07:34:41

Gu_xl 发表于 2013-2-2 20:33 static/image/common/back.gif
(vl-sortmylist'(lambda (a b) (if (= (car a) (car b)) (if (= (cadr a) (cadr b)) (< (caddr a) (cad ...

非常感谢!
页: [1]
查看完整版本: 请问串列如何实现三行内容资料排序