如何返回元组列表的最低值元组？

Question

我有一个带有名称和浮点数的元组列表。如何返回具有最低浮点值的元组？

例子

[("bob",23),("Alice",32),("Susan",1)]

rtnLowestDist :: [(Name, Float)] -> (Name, Float)

返回 ("Susan",1)

Answer 1

使用minimumByfromData.List来查找最小元素，并comparing snd通过它们的第二个组件应用来比较元组。

import Data.List
import Data.Ord

rtnLowestDist = minimumBy (comparing snd)