一个时髦的标题也许,但我遇到了下列问题:给定一个(A * B)列表,返回(A * B列表)名单
鉴于(a * b) list
类型的列表,我想创建一个类型为(a * b list) list
的新列表。举例:
给定列表let testList = [(1,"c");(2,"a");(1,"b")]
,我的函数应该返回[(1, ["c";"b"]; (2, ["a"])]
。
我有以下的,但我对如何继续有点卡住:
let rec toRel xs =
match xs with
| (a,b)::rest -> (a,[b])::toRel rest
| _ -> []
您可以使用''List.groupBy'' – Gustavo