ハスケルにリストを追加するための慣習的な方法は何ですか？

Question

ハスケルに2つのリストを追加したいとします。これを行う最も一般的な方法は何ですか？

は、ここに私がやったことだ：

addLists :: (Integral a) => [a] -> [a] -> [a] 
addLists xs ys = map add $ zip xs ys 
    where add (x, y) = x+y 

Answer 1

が供給関数を使用して2つのリストを組み合わせたzipWithライブラリ関数があります。それはあなたがここに欲しいものを正確に行い、あなたが得る：

は

addLists = zipWith (+) 

これはさらに、引数として与えられたリストの要素を組み合わせること(+)を使用しています。

Answer 2

addLists xs ys = zipWith (+) xs ys 

Answer 3

のApplicativeのFunctorスタイル：

import Control.Applicative 

addLists xs ys = getZipList $ (+) <$> ZipList xs <*> ZipList ys 

注リストのApplicativeファンクタ作るには二つの方法があるので、これはとても醜いであること。最初の（そしてIMHOの役に立たない）方法は、すべての組み合わせを取ることです。その方法は「標準」になります。したがって、(+) <$> [1,2] <*> [30,40]は[31,41,32,42]です。もう1つの方法は、ここで必要なリストを圧縮することですが、タイプごとに1つのタイプクラスインスタンスしか持たないので、リストをZipListsでラップし、getZipListを使用して結果をアンラップする必要があります。