按元素列表的第二个元素对列表进行排序

Question

我想按元素的第二个元素对列表进行排序。

例输入：

[("Bob",3),("Terry",1)] 

输出示例：

[("Terry",1)("Bob",3)] 

Answer 1

您可以使用sortBy和comparing：

sortBy :: (a -> a -> Ordering) -> [a] -> [a] 
comparing :: (Ord b) => (a -> b) -> a -> a -> Ordering 

在这种情况下，我们想通过第二个元素进行比较。你可以使用comparing snd来获得一个函数，它可以通过元素的第二个元素比较两个元组。

Answer 2

另一个很酷的技巧是使用on从Data.Function：

import Data.Function (on) 
import Data.List (sortBy) 

sortBy (compare `on` snd) [...] 

不低于comparing太大的不同，但是从时间一个漂亮的把戏时间。

Answer 3

考虑一个“普通”之类的

sort xs = ... a < b ... 

这样的各种必须的compare使用，或它的朋友，如<。所以，如果你已经实现了这样的事情，那么，而不是只是compare a b或a < b，而不是compare (snd a) (snd b)或snd a < snd b。

sort xs = ... snd a < snd b ... 

当然，如果你聪明，你会抽象出来的“访问”，并使它成为一个额外的输入排序功能：

sortComparingOn f xs = ... f a < f b ... 

你甚至可以抽象出比较干脆：

sortBy cmp xs = ... a `cmp` b ... 

sortBy在Data.List中提供，如上面提到的那样。