Question

我一直在研究clojure一段时间，但我找不到一个能为嵌套地图提供默认值的函数。例如，如果我有如下地图，

(def paths {:A {:B 5, :D 5, :E 7},
            :B {:C 4},
            :C {:D 8, :E 2},
            :D {:C 8, :E 6},
            :E {:B 3}
            })

我想要一个从给定的哈希图

创建如下地图的函数

{:A {:B 5, :C default_val :D 5, :E 7},
            :B {:A default_val, :C 4, :D default_val, :E default_val},
            :C {:A default_val, :B default_val, :C default_val, :D 8, :E 2},
            :D {:A default_val, :B default_val,  :C 8, :D default_val, :E 6},
            :E {:A default_val, :B 3,  :C 8, :D default_val, :E 3}
            }

Answer 1

从阅读你的例子来看，你很难确切知道你何时想要包含默认值，尽管有一种非常常见的模式，即提供一组默认值并将输入合并到其中，以便在给出值的任何地方使用它，如果它不是特定键的默认值：

user> (def default-values {:A :default :B :default :C :default :D :default})
#'user/default-values

user> (def paths {:A {:B 5, :D 5, :E 7},
            :B {:C 4},
            :C {:D 8, :E 2},
            :D {:C 8, :E 6},
            :E {:B 3}})
#'user/paths

user> (keys paths)
(:A :D :B :C :E)

user> (vals paths)
({:D 5, :B 5, :E 7} {:C 8, :E 6} {:C 4} {:D 8, :E 2} {:B 3})

user> (map #(merge default-values %) (vals paths))
({:A :default, :D 5, :B 5, :C :default, :E 7} 
 {:A :default, :D :default, :B :default, :C 8, :E 6} 
 {:A :default, :D :default, :B :default, :C 4}
 {:A :default, :D 8, :B :default, :C :default, :E 2} 
 {:A :default, :D :default, :B 3, :C :default})

user> (clojure.pprint/pprint
       (zipmap (keys paths) 
               (map #(merge default-values %) 
                    (vals paths))))
{:E {:A :default, :D :default, :B 3, :C :default},
 :C {:A :default, :D 8, :B :default, :C :default, :E 2},
 :B {:A :default, :D :default, :B :default, :C 4},
 :D {:A :default, :D :default, :B :default, :C 8, :E 6},
 :A {:A :default, :D 5, :B 5, :C :default, :E 7}}

clojure中嵌套映射的默认值

1 个答案: