请问串列如何实现三行内容资料排序
(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 20:43 编辑
占沙发!
占沙发!
本帖最后由 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)) ))) 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]