list - 如何在 F# 中聚合多个列表

Question

在 F# 中，有时我有很多列表（输入数据的实际数量不同），我想对所有这些列表进行聚合（为了简化而添加）。所以我想要实现的与 List.map2 或 List.map3 所做的相同，但列表数量更大。

我该如何接近它？我想知道这是否可能与 List.scan 相关？

score 9 · Accepted Answer

您可以使用List.reduce并执行以下操作：

> let lists = [[1;2;3]; [1;2;3]; [1;2;3]]
val lists : int list list = (...)

> lists |> List.reduce (List.map2 (+));;
val it : int list = [3; 6; 9]

这是做什么的？

List.reduce获取一个值列表（这里的值为int list），并使用一个说明如何合并两个值的函数将它们聚合为一个值。所以在这种情况下，我们需要给它一个函数int list -> int list -> int list，它会在第一个和第二个列表上调用它，然后在结果和第三个列表上调用它（依此类推）。
参数List.map2 (+)是正确类型的函数 - 它接受两个列表并执行两个列表的成对求和。这实际上只是编写如下内容的捷径：
```
lists |> List.reduce (fun list1 list2 -> 
  List.map2 (fun a b -> a + b) list1 list2)
```

1 回答 1