按元素列表的第二個元素對列表進行排序

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中提供，如上面提到的那樣。