Clojure - 如何将两个/多个映射合并到一个映射中，这些映射对于某些键具有相同的值答案

【问题标题】：Clojure - How merge two/more maps into a single map which have the same value for certain key(s)Clojure - 如何将两个/多个映射合并到一个映射中，这些映射对于某些键具有相同的值
【发布时间】：2014-08-27 17:48:43
【问题描述】：

我正在学习如何在 Clojure 中惯用地破坏数据结构，目前有以下示例数据

数据：

(def data [
{:category "A", :vertical_name "One", :vertical_id 11}
{:category "B", :vertical_name "Two", :vertical_id 12}
{:category "A", :vertical_name "Three", :vertical_id 13}
{:category "C", :vertical_name "Four", :vertical_id 14}
])

我想将两个/多个地图合并为一个地图，这些地图属于上述数据中的同一类别，

预期输出：

{{:category "A", :vertical [{:vertical_id 11, :vertical_name "One"}{:vertical_id 13,  :vertical_name "Three"}]}
{:category "B", :vertical {:vertical_id 12, :vertical_name "Two"}}
{:category "C", :vertical {:vertical_id 14, :vertical_name "Four"}}}

我已经尝试过 group-by 这给了我

{"A" [{:category "A", :vertical_name "One", :vertical_id 11} {:category "A", :vertical_name "Three", :vertical_id 13}],
"B" [{:category "B", :vertical_name "Two", :vertical_id 12}],
"C" [{:category "C", :vertical_name "Four", :vertical_id 14}]}

但这有很多冗余信息，例如:category "A" 存在于所有地图中，并且输出的格式不是我想要的。

提前感谢您的帮助。

【问题讨论】：

您的预期输出不是有效的地图（它有奇数个元素）也许您的意思是它是一个向量？
@noisesmith - 感谢您指出这一点。我修正了引号。我希望它是地图的地图。
你所拥有的是从一个映射到另一个映射的映射——它是无效的，因为映射需要与值一样多的键。一个键是一个结果，值是下一个结果的映射，似乎很荒谬。也许你想要一套？
@noisesmith - 是的！我想我可以使用一组。

标签： clojure destructuring

【解决方案1】：

user> (->> data
        (group-by :category)
        (map (fn [[k v]]
                 (let [vertical (map #(dissoc % :category) v)
                       vertical (if (< (count vertical) 2)
                                  (first vertical)
                                  (vec vertical))]
                   {:category k
                    :vertical vertical})))
        set)

#{{:category "A", :vertical [{:vertical_name "One", :vertical_id 11} {:vertical_name "Three", :vertical_id 13}]} {:category "B", :vertical {:vertical_name "Two", :vertical_id 12}} {:category "C", :vertical {:vertical_name "Four", :vertical_id 14}}}

这是您描述的格式，但对于大多数用途来说，它会比group-by 提供的输出更糟糕。与group-by 结果不同，随着结果大小的缩放，您无法有效地查找给定类别。此外，与group-by 的结果不同，有时:vertical 键有一个集合，有时只有一个元素，这是一种复杂性，转移到访问此数据的任何其他代码上。

【讨论】：

我明白你的意思。但就我而言，一旦我拥有特定格式的数据，我需要将其转换为 JSON 并将其返回给调用设备。
OK - 如果这是其他人的 API 的要求，那么降级到“更差”的表示是没有害处的。但如果我们设计一个 API，默认结果会更有用。