哈斯克尔与列表麻烦

Question

我是新来的Haskell，我试图编写一个简单的函数，接受一个整数列表并返回一个列表，使第一个元素添加到列表中的所有元素。

这是我到目前为止。

addFirstEl [] = [] 
addFirstEl (x:xs) = [x + x | x <- xs] 

不幸的是所有this已经成功地做到了没有第一个元素返回一个列表，并加倍其他元素。

Answer 1

x在列表理解中的绑定隐藏了模式中的变量x。试试这个：

addFirstEl [] = [] 
addFirstEl (x1:xs) = [x1 + x2 | x2 <- xs] 

编辑

在回答你对此有何评论

的第一要素还是会从返回的列表中删除

在(x1:xs)，xs是列表的其余部分或tail。它是x1之后的所有元素，即head。如果你想添加x1的所有元素，包括本身，你可以写

addFirstEl [] = [] 
addFirstEl (x1:xs) = [x1 + x2 | x2 <- (x1:xs)] 

或在head

addFirstEl [] = [] 
addFirstEl xs = [head xs + x | x <- xs] 

Answer 2

条款试试这个：

addFirstEl [] = [] 
addFirstEl l@(x:_) = [x + x1 | x1 <- l ] 

或

addFirstEl [] = [] 
addFirstEl l@(x:_) = map (+ x) l