ハスケル - 選択的にリスト

Question

私は以下の型持って追加：

type Rating = (String, Int) 
type Film = (String, String, Int, [Rating]) 

testDatabase :: [Film] 
testDatabase = [("Director 1","Film 1",2012,[("TestRat",8)]),("Director 2","Film 2",2,[])] 

を私はディレクターの平均評価は組み合わせた彼らの映画のすべてに基づいて、その後、すべての彼らの評価を合わせているかを調べる必要があります。私は本当にこれにアプローチする方法が全く分かりませんでした。フィルムのタプルの平均を取得するだけで、すべてのものを処理することはできませんでした。平均値を操作するための

マイコード：

filmRating :: [(String,Int)] -> Float 
filmRating ratings = average (map snd ratings) 

average ratings = realToFrac (sum ratings)/genericLength ratings 

Answer 1

データ解析のためのData.Listには多くの便利な機能があります。

は特に、groupByは超便利です：バケットに

が

> :t groupBy 
groupBy :: (a -> a -> Bool) -> [a] -> [[a]] 

平等機能を考えると、グループのリスト。

ディレクトリにアクセスするための機能：次に

> let fst4 (x,_,_,_) = x 

、そのディレクターによるディレクター名のソート、バケット（グループ）。

> let db0 = sortBy (comparing fst4) testDatabase 
> let db1 = groupBy ((==) `on` fst4) db0 
[ [("Director 1","Film 1",2012, [("TestRat",8)])] 
, [("Director 2","Film 2",2 ,[])] 
] 

groupByあなたが立ち往生している何