list - haskellの2つのリストに対する2つの操作

Question

私はHaskellの初心者です。数の無限リストが2つAあり、 「s」と「s」のシーケンスを含むB別の無限リストを作成したいとします。ここで、とは、ループごとに2ずつ増加します。これを行うための最も賢い方法は何ですか？Cx+yx-yx <- Ay <- BC

Answer 1

2要素リストの無限リストを作成し、それらを連結します。

concat [[x+y, x-y] | (x, y) <- zip listA listB]

Answer 2

定義上、デバッグするには賢すぎるので、おそらく最も賢い方法は望まないでしょう:-)

明らかな方法は、次のように、無限のストリームを一緒に圧縮することです。

zipWith k as bs
    where
        k a b = (a + b, a - b)

Answer 3

無限のリストの場合のみ

mkList (x:xs) (y:ys) = x+y : x-y : mkList xs ys

有限リストもサポートするには、ベースケースを追加する必要があります

mkList _ _ = []

Answer 4

f xs = concat . zipWith go xs where 
       go x y = map (($y).($x)) [(+),(-)]