trong F #, Làm cách nào để hợp nhất 2 trường hợp Collections.Map?

Question

Tôi đang cố hợp nhất hai Bản đồ nhưng không có phương thức tích hợp để tham gia Bộ sưu tập. vậy bạn sẽ làm sao?

Answer 1

Xác định các chức năng sau:

let join (p:Map<'a,'b>) (q:Map<'a,'b>) = 
    Map(Seq.concat [ (Map.toSeq p) ; (Map.toSeq q) ]) 

dụ:

let a = Map([1,11;2,21;3,31;]) 

let b = Map([3,32; 4,41;5,51;6,61;]) 

let c = join a b 

và kết quả:

val c : Map<int,int> = 
    map [(1, 11); (2, 21); (3, 32); (4, 41); (5, 51); (6, 61)] 

Answer 2

Bạn có thể thực hiện điều này bằng Map.fold và Map.add, vì add là thực sự thêm/thay thế:

let map1 = Map.ofList [ 1, "one"; 2, "two"; 3, "three" ] 
let map2 = Map.ofList [ 2, "two"; 3, "oranges"; 4, "four" ] 


let newMap = Map.fold (fun acc key value -> Map.add key value acc) map1 map2 

printfn "%A" newMap 

Có lẽ lý do hợp nhất không được cung cấp ra khỏi hộp là bạn cần để đối phó với xung đột chính. Trong thuật toán kết hợp đơn giản này, chúng ta đơn giản lấy cặp giá trị khóa từ bản đồ thứ hai, đây có thể không phải là hành vi mà bạn muốn.

Answer 3

Một cách khác là thế này:

let merge (a : Map<'a, 'b>) (b : Map<'a, 'b>) (f : 'a -> 'b * 'b -> 'b) = 
    Map.fold (fun s k v -> 
     match Map.tryFind k s with 
     | Some v' -> Map.add k (f k (v, v')) s 
     | None -> Map.add k v s) a b 

Nó cho phép bạn quyết định giá trị bạn muốn nếu có khóa trùng lặp.

Ví dụ:

let a = Map([1,11;2,21;3,31;]) 

let b = Map([3,32; 4,41;5,51;6,61;]) 

merge a b (fun k (v, v') -> v + v');; 

//Result 
val it : Map<int,int> = 
    map [(1, 11); (2, 21); (3, 63); (4, 41); (5, 51); (6, 61)] 

Chú ý rằng chìa khóa 3 là khác nhau.