Haskell-在列表

Question

我想編寫一個函數，接受一個數字i和數字xs和 回報i列表xs位置的列表，計數第一個位置爲1。如果i確實 找到元素不會發生xs，然後position返回0

到目前爲止，我有這樣的：

import Data.List 
position :: Int -> [Int] -> Int 
position i xs 
    | i `elem` xs = i `elemIndex` xs 
    | otherwise = 0 

但是當我編譯，它提供了以下錯誤：

Couldn't match expected type ‘Int’ with actual type ‘Maybe Int’

我知道elemIndex返回Maybe Int類型，我定義我的函數返回Int，但我不知道如何去改變它。有任何想法嗎？

Answer 1

首先，列表索引0…。因此elemIndex將返回Just 0如果i碰巧是您的列表中的第一個元素。

由於elemIndex回報Maybe Int，你可以在它的結果，而不是模式匹配：

import Data.List 

position :: Eq a => a -> [a] -> Int 
position i xs = maybe 0 (+1) $ i `elemIndex` xs 

Answer 2

我認爲，上述解決方案可以使用maybe功能是一個班輪甚至在haskell的標準前奏中使用zip函數:) 只需用[1 ..]壓縮它，然後使用它提供的列表理解。 看看這裏的代碼：

positions n xs = [y | (y,z) <- zip [1..] xs, z==n]

要查找出現次數的數量，只需使用長度從標準的前奏：

Answer 3

，你可以：

import Data.List (elemIndex) 

position :: Eq a => a -> [a] -> Int 
position i xs = 
    case i `elemIndex` xs of 
     Just n -> n + 1 
     Nothing -> 0