替换 Haskell 中的单个列表元素？

我有一个元素列表，我希望更新它们：

由此：["Off","Off","Off","Off"]

对此：["Off","Off","On","Off"]

由于我对 Haskell 有点陌生，所以我一直在使用(x:xs)!!y使用以下函数提取和更新各个组件：

replace y z [] = []
replace y z (x:xs)
  | x==y           = z:replace y z xs
  | otherwise      = x:replace y z xs

然后在ghci中输入以下内容：(replace "Off" "On" ["Off",'Off","Off","Off"]) !! 2

我得到以下信息："On"

我似乎能够提取和转换列表的元素，但我似乎无法获得转换后的单个元素的列表。

任何有关此事的帮助将不胜感激。

通常，您可以通过拆分列表、替换元素并将其重新连接在一起来修改列表的元素。

要在索引处拆分列表，我们有：

 splitAt :: Int -> [a] -> ([a], [a]) 

您可以使用它来分解列表，如下所示：

 > splitAt 2 ["Off","Off","Off","Off"] 
 (["Off","Off"],["Off","Off"])

现在你只需要弹出snd列表的组成部分。这很容易完成模式匹配:

 > let (x,_:ys) = splitAt 2 ["Off","Off","Off","Off"]
 > x
 ["Off","Off"]
 > ys
 ["Off"]

您现在可以通过“On”重新加入列表：

 > x ++ "On" : ys
 ["Off","Off","On","Off"]

我将让您将这些部分组合成一个函数。

作为风格注释，我建议使用新的自定义数据类型，而不是String对于你的切换：

 data Toggle = On | Off deriving Show