求助：如何让一个TABLE按指定顺序排序？

wuyuhe · 发表于 2015-11-9 10:38

EDA365欢迎您！

您需要登录才可以下载或查看，没有帐号？注册

x

如有一个TABLE为sum='('("L06" '(-0.5 2.5)) '("H09" '(-2.5 2.5)) '("A03" '(-1.5 2.5)))
如何让它排序成sum='('("H09" '(-2.5 2.5)) '("A03" '(-1.5 2.5)) '("L06" '(-0.5 2.5)))

wuyuhe · 发表于 2015-11-9 14:51

各位版本大大帮忙看看啊

XYX365 · 发表于 2015-11-9 15:49

排序任何資料都要有一個基準點,
而看了資料後你是要依照第二個List裡面的第一個數值排列嗎?

wuyuhe · 发表于 2015-11-9 16:13

XYX365 发表于 2015-11-9 15:49
排序任何資料都要有一個基準點,
而看了資料後你是要依照第二個List裡面的第一個數值排列嗎?

对的

XYX365 · 发表于 2015-11-9 16:25

wuyuhe 发表于 2015-11-9 16:13
对的

可以參考看看
https://www.eda365.com/thread-114336-1-2.html

361553894 · 发表于 2015-11-11 08:24

你这是根据caadr排序的么？

wuyuhe · 发表于 2015-11-11 09:29

361553894 发表于 2015-11-11 08:24
你这是根据caadr排序的么？

对的。

361553894 · 发表于 2015-11-11 11:16

本帖最后由 361553894 于 2015-11-11 11:19 编辑

wuyuhe 发表于 2015-11-11 09:29
对的。

procedure( caadrSort(list1 list2)
let((y1 y2 result)
y1 = caadr(list1)
y2 = caadr(list2)
if(axlStrcmpAlpNum(y1 y2) then
result = t
else
result = nil
)
result
)
)

复制代码

List = sort(List 'caadrSort)

if(axlStrcmpAlpNum(y1 y2) then 这行你自己改成lessp，其实不改也能用了

wuyuhe · 发表于 2015-11-12 08:13

361553894 发表于 2015-11-11 11:16
List = sort(List 'caadrSort)

if(axlStrcmpAlpNum(y1 y2) then 这行你自己改成lessp，其实不改也 ...

嗯，收到，谢谢。

akl1111 · 发表于 2015-11-16 16:35

看看

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

求助：如何让一个TABLE按指定顺序排序？

EDA365欢迎您！

点评

点评

点评

点评

点评

推荐内容 /1