如何让 ToDictionary 在 F# 中工作?

How to get ToDictionary to work in F#?

我有这个 C# 示例,它将根据整数数组创建奇数和偶数字典:

int[] values = new int[]
{
    1,
    2,
    3,
    5,
    7
};

Dictionary<int, string> dictionary = 
           values.ToDictionary(key => key, val => (val % 2 == 1) ? "Odd" : "Even");

// Display all keys and values.
foreach (KeyValuePair<int, string> pair in dictionary)
{
    Console.WriteLine(pair);
}

输出为:

[1, Odd]
[2, Even]
[3, Odd]
[5, Odd]
[7, Odd]

我想在 F# 中使用 ToDictionary 进行类似的操作,到目前为止:

let values = [| 1; 2; 3; 5; 7 |]

let dictionary = values.ToDictionary( ??? )

// Display all keys and values.
for d in dictionary do
    printfn "%d %s" d.Key d.Value

但是我将如何编写 ToDictionary 中的逻辑?

像这样:

ToDictionary(id, fun v -> if v % 2 = 1 then "Odd" else "Even")

您当然可以使用 F# 中的 ToDictionary(以及所有其他 LINQ 方法),但有时使用 F# 库中的函数更为惯用。

如果我想创建这本词典,我会使用这样的东西:

let values = [| 1; 2; 3; 5; 7 |]
let dictionary = dict [ for v in values -> v, if v % 2 = 1 then "Odd" else "Even" ]

这里 dict 是一个 F# 库函数,它从包含键和值的元组创建字典(元组是使用 , 创建的,因此我们使用 v 作为键和作为值的字符串)。