是否从映射中删除nil值？
提问于 2010-10-14 21:15:59
我有一个可能包含nil值的Clojure map，我正在尝试编写一个函数来删除它们，但没有太多成功(我是新手)。
例如：
(def record {:a 1 :b 2 :c nil})
(merge (for [[k v] record :when (not (nil? v))] {k v}))这会产生一系列的映射，这并不是我期望从merge中得到的：
({:a 1} {:b 2})我想要：
{:a 1, :b 2}
回答 9
Stack Overflow用户
回答已采纳
发布于 2010-10-14 22:37:32
for列表理解返回一个映射列表，因此您需要将此列表作为可选参数应用于merge函数：
user> (apply merge (for [[k v] record :when (not (nil? v))] {k v}))
{:b 2, :a 1} 更简洁的解决方案是将map过滤为一个序列并连接到一个map中：
user> (into {} (filter second record))
{:a 1, :b 2} 不要删除false值：
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} Stack Overflow用户
发布于 2014-03-05 01:30:52
下面是一个在嵌套地图上工作的方法：
(defn remove-nils
[m]
(let [f (fn [[k v]] (when v [k v]))]
(postwalk (fn [x] (if (map? x) (into {} (map f x)) x)) m)))Stack Overflow用户
发布于 2015-12-11 10:53:48
@Eelco答案的一个变体：
(defn remove-nils [m]
(let [f (fn [x]
(if (map? x)
(let [kvs (filter (comp not nil? second) x)]
(if (empty? kvs) nil (into {} kvs)))
x))]
(clojure.walk/postwalk f m)))根据@broma0的观点，它消除了任何空的映射。
user> (def m {:a nil, :b 1, :c {:z 4, :y 5, :x nil}, :d {:w nil, :v nil}})
user> (remove-nils m)
{:b 1, :c {:z 4, :y 5}}
user> (remove-nils {})
nil页面原文内容由Stack Overflow提供。腾讯云小微IT领域专用引擎提供翻译支持
原文链接：
https://stackoverflow.com/questions/3937661
复制
腾讯云开发者
