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

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-sort mylist '(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
(vl-sort mylist '(lambda (a b) (if (= (car a) (car b)) (if (= (cadr a) (cadr b)) (< (caddr a) (cad ...

非常感谢！

账号		自动登录	找回密码
密码			注册

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

相关帖子