Haskell - マップ関数に引数を渡す？

Question

基本的な質問...私は、しかし、私は別の関数からこれを実行するには、リストの上にマッピングし、各要素に関数を適用したい：

functionOne :: Int -> Int -> Int --Add x to each element of the list 
functionOne element x = element + x 

functionTwo :: [Int] -> (Int -> Int -> Int) -> [Int] 
functionTwo list fOne = map list fOne ave --map list by applying functionOne with ave as x 
    where 
    ave = ((sum list)/length list) 

なぜこの作業ではないのですか？

Answer 1

あなたはおそらく、この欲しい：我々はfOne el aveに各elをマッピングする機能である匿名関数(\el -> fOne el ave)を使用し、上記

functionTwo :: [Int] -> (Int -> Int -> Int) -> [Int] 
functionTwo list fOne = map (\el -> fOne el ave) list 
    where 
    ave = sum list `div` length list 

を。このようにして、2番目の引数fOneを希望の値に固定します。

あるいは、整数除算のため

functionTwo :: [Int] -> (Int -> Int -> Int) -> [Int] 
functionTwo list fOne = map (flip fOne ave) list 
    where 
    ave = sum list `div` length list 

注div、/のみ浮動小数点数で動作します。

flip fは、fと同じ機能ですが、最初の2つの引数は他の順序になります。

map (`fOne` ave) listでも可能です。