现在我正在尝试创建一个基本函数，用于删除句子中的所有空格或逗号。

stringToIntList :: [Char] -> [Char]
stringToIntList inpt = [ a | a <- inpt, a `elem` [" ",","]]

我遇到的问题是，我尝试过的每一种类型都不起作用，如果我输入 [Char] 它会在逗号处出现问题，如果我输入 [string] 它会在空格处出现问题，如果我输入string 它只是不识别 a 并说这是一个错误。所以我想知道是否有某种类型可以同时用作 [Char] 和 [string]。

最佳答案

对于当前的类型，定义需要是

stringToIntList inpt = [ a | a <- inpt, a `elem` [' ',',']]

(单引号，因为这些是 Char 字面量，而不是 String 字面量!)，
或者

stringToIntList inpt = [ a | a <- inpt, a `elem` " ,"]

(使用字符串只是字符列表的事实)，
或者简单地

stringToIntList = filter (`elem` " ,")

请注意，这不会删除 空格和逗号，相反，这些是它保留 的唯一字符。要删除它们，您需要反转谓词:

stringToIntList = filter $ not . (`elem` " ,")

正如 Iceland_jack 所说，这个组合实际上有一个标准函数:

stringToIntList = filter (`notElem` " ,")

如果你真的想要 a `elem` ["",","] 那么你的函数类型需要是

stringToIntList :: [String] -> [String]

或等同于 [[Char]] -> [[Char]]。

https://stackoverflow.com/questions/70552752/