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) -> ...