haskell - 在 Haskell 中按函数结果对列表进行排序

Question

我正在尝试使用sortByand来订购一个列表compare，但是我遇到了比较表达式的问题。我需要它根据 filmRating 函数返回的平均值对列表进行排序。

formattedByYear :: Int -> String
formattedByYear year = concatMap formatString $ sortBy (compare filmRating) $ filmsByYear year

filmRating :: Film -> Float
filmRating (Film _ _ _ ratings)
      | ratings == [] = 0.0
      | otherwise = average (map snd ratings)

Answer 1

你想要的功能是Data.Ord.comparing.

Prelude> :t Data.Ord.comparing
Data.Ord.comparing :: Ord a => (b -> a) -> b -> b -> Ordering