アップデート「リストのx番目の要素 - Haskellの

Question

可能性の重複：私は私の割り当てのこの部分でいくつかの進歩を作るために管理しているが、その一部を添付した
Replace individual list elements in Haskell?

私が作った以下のコード：

module Grid where 

data State = On | Off deriving (Eq, Show) 

next :: State -> State 
next On = Off 
next Off = On 

type Row = [State] 


updateRow :: Row -> Int -> Row 
updateRow (r:rs) x 
    | x == 0  = next r:rs 
-- | otherwise  = ........???? 

最後の行に示されているように、私はupd ateRowは、以下に示すようにx = 0のときに働きます（0番目の要素が反転しています）。

*Grid> updateRow [Off,Off,Off,Off] 0 
[On,Off,Off,Off] 
*Grid> 

このリストの他の要素を反転すると、すべてが元に戻ります。私はこの関数で式を「ジェネラル化」することはできません。事前に

updateRow :: Row -> Int -> Row 

ありがとう：

は、私はまた、このタイプの規則に従わなければなりません。

Answer 1

何か：一般的な更新機能について

module Grid where 

data State = On | Off deriving (Eq, Show) 

next :: State -> State 
next On = Off 
next Off = On 

type Row = [State] 


updateRow :: Row -> Int -> Row 
updateRow (r:rs) x 
    | x == 0  = next r:rs 
    | otherwise = r : (updateRow rs (x-1)) 
updateRow [] x = [] 

Answer 2

previous question you askedに用意されている機能を使用してください。どんなタイプのリストでも動作します。あなたがここでやりたいことをしていると思います。そのような

Answer 3

どのように？

update i a as = map repl $ zip as [0..] where 
    repl (a',i') | i == i' = a 
       | otherwise = a' 

パフォーマンスの高いバージョンがありますが、これはわかりやすく、短いリストには十分です。 asのi要素（存在する場合）はaに置き換えられます。

Answer 4

実際にあなたのupdateRow機能のotherwise一部のためのアイデアは、あなたが他のquestionのreplaceに持っているものに似ています。

アイデアがある：xがゼロでない場合、あなたは（位置ゼロである）要素rをスキップしてsomethingは、アカウントに1つのポジションをとる​​（ある位置でrsにupdateRowを呼び出したいことあなたはちょうどスキップしました）。

私はこれが役に立ちそうですか