f# - 按元组成员映射元组列表

Question

假设我有一个列表 decimal*decimal

let tup = [(1M, 2M); (2M, 3M); (3M, 3M); (4M, 5M); (5M, 6M); (7M, 6M); (8M, 9M); (10M, 9M)]

我需要一个可以将所有值组合在一起的函数，如果它们可以连接的话，例如，

map[(100, [1M; 2M; 3M]); (101, [4M; 5M; 6M; 7M]); (102, [8M; 9M; 10M])]

我不能只执行 List.groupBy，因为它会遗漏任何其他可能由另一个十进制值“在线”连接的其他内容。映射中的 int 值是任意的。我希望能够“播种”起始值，然后将每个值递增一些。

可以执行此操作的函数是什么样的？

Answer 1

我说的“连接”是指数字代表节点而元组代表无向图中的边吗？据我所知，标准库中没有函数可以做到这一点。您可以搜索一些执行基本图形操作的库。您要执行的操作是除以 connected components .

您也可以尝试从头开始实现该功能。这是一些nice attempt .