所以我定义的函数将值映射到1或0,具体取决于是否匹配。
例如:
match 3 [1,2,3,4,5] == [0,0,1,0,0]
到目前为止,我所写的用于定义“匹配”功能的是:
let match :: a -> [a] -> [Int]; match x xs = map
当然,我还没有在“地图”之后写出来,这就是我需要帮助的地方。
答案 0 :(得分:7)
match x = map (fromEnum . (==x))
答案 1 :(得分:1)
或者您可以尝试这种更直接的版本:
match e xs = map (\x -> if x == e then 1 else 0) xs