Question

我正在寻找一个函数，它接受两个列表之间的交集，并创建一个新列表，我有这个函数：let intersect x y = Set.intersect (Set.ofList x) (Set.ofList y)做我蚂蚁但我不想使用F＃中的任何内置函数

Answer 1

最好使用库中的东西，但如果你不能

如果我们假设输入列表已排序（使用List.sort或自己编写）：

let rec intersect a b =
    match a with
    |h::t -> match b with
             |h2::t2 -> 
                 if h=h2 then h::(intersect t t2)
                 else if h>h2 then intersect t b else intersect a t2
             |[] -> []
    |[] -> []

Answer 2

我同意在这种情况下将列表转换为集合并不好。

这是另一种替代方案，无需转换为集合即可使用内置Enumerable.Intersect函数：

open System.Linq

let intersect (xs:'a seq) (ys: 'a seq) = xs.Intersect(ys)

您可以使用FSharpList调用此功能。

两个列表F＃之间的交叉点

2 个答案: