clojure - 从 map 中删除零值？

Question

我有一个 Clojure 映射，其中可能包含 nil 值，我正在尝试编写一个函数来删除它们，但没有取得多大成功(我对此很陌生)。

例如:

(def record {:a 1 :b 2 :c nil})
(merge (for [[k v] record :when (not (nil? v))] {k v}))

这会产生一系列 map ，这不是我期望的合并结果:

({:a 1} {:b 2})

我想要:

{:a 1, :b 2}

Answer 1

您的for列表理解返回映射列表，因此您需要将此列表作为可选参数应用于合并函数:

user> (apply merge (for [[k v] record :when (not (nil? v))] {k v}))
{:b 2, :a 1}      

通过将映射作为序列进行过滤并连接成映射来实现更简洁的解决方案:

user> (into {} (filter second record))
{:a 1, :b 2}  

不要删除错误值:

user> (into {} (remove (comp nil? second) record))
{:a 1, :b false}  

使用dissoc允许持久数据共享，而不是创建全新的 map :

user> (apply dissoc                                                                                            
       record                                                                                                  
       (for [[k v] record :when (nil? v)] k))
{:a 1, :b 2}