434939575 发表于 2015-3-4 17:26:35

vl-sort 排序消重不理会实数

今天用vl-sort。进行排序。看到参考例子对数值表排序：

_$ (vl-sort '(3 2 1 3) '<)
(1 2 3)   ;
我的表是实数(vl-sort '(3.0    3.03.03.023) '<)
返回 :(2 3.0 3.0 3.0 3.0 3)
估计是只能接受整数。才能消重了。

自贡黄明儒 发表于 2015-3-5 12:44:27

可能你不怎么上明经和晓东，均有讨论
(vl-sort (mapcar '(lambda (x) (read(rtos x 2 8))) '(3.0    3.03.03.023)) '<)

434939575 发表于 2015-3-5 16:23:03

自贡黄明儒 发表于 2015-3-5 12:44 static/image/common/back.gif
可能你不怎么上明经和晓东，均有讨论
(vl-sort (mapcar '(lambda (x) (read(rtos x 2 8))) '(3.0    3.0   ...

谢谢大师关照指点。我用FIX处理的。
页: [1]
查看完整版本: vl-sort 排序消重不理会实数