Haskell字符串的int元组列表

Question

我正在尝试从以下位置写出我的元组列表：

[(8,7),(5,6),(3,3),(9,4),(5,4)]

至：

8 7 5 6 3 3 9 4 5 4

这是我走了多远：（更新）

showTuples :: Board -> String
showTuples = unwords . fmap show . concatMap (\(x,y) -> [x,y])

我知道我想将此函数映射到列表中的所有元素，但似乎无法正确执行。

（更新）它有效，但是引号仍然存在问题

董事会的类型还有：

type Board = [(Int,Int)]

Answer 1

使用模式匹配：

type Board = [(Int, Int)]

showTuples :: Board -> String
showTuples [] = ""
showTuples (x:[]) = show(fst(x)) ++ " " ++ show(snd(x))
showTuples (x:xs) = show(fst(x)) ++ " " ++ show(snd(x)) ++ " " ++ showTuples xs

main :: IO ()
main = putStrLn . showTuples $ [(8, 7), (5, 6), (3, 3), (9, 4), (5, 4)] -- 8 7 5 6 3 3 9 4 5 4

Answer 2

这也可以通过foldl来完成。

Prelude> foldl (\r (x,y) -> r ++ " " ++ show x ++ " " ++ show y) "" [(8,7),(5,6),(3,3),(9,4),(5,4)]
" 8 7 5 6 3 3 9 4 5 4"

如果您不希望前面的空格，那么就像tail $ foldl (\\r (x,y) -> ...