Haskell - 將參數傳遞給map函數？

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

你可能想這樣的：

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

上面，我們使用匿名函數(\el -> fOne el ave)，這是函數映射每個el到fOne el ave。通過這種方式，我們將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的功能相同，但前兩個參數的順序不同。

也有可能：map (`fOne` ave) list。