Yes, that does the job. Thanks for your help and time. On Thursday, August 20, 2015 at 12:21:47 AM UTC+2, Alan Forrester wrote: > > On 19 Aug 2015, at 18:08, Hussein B. <hubag...@gmail.com <javascript:>> > wrote: > > > Here is more concrete example > > > > (def s [{"n" {"id" "a"} "d" 2 "children" [{"n" {"id" "c"} "d" 4 > "children" nil}]} {"n" {"id" "b"} "d" 3 "children" nil}]) > > > > > > I want to find the map that has value "c" for "id". If found, I need to > return the map {"n" {"id" "c"} "d" 4 "children" nil} > > One way to do this follows. First get all of the sub-maps, which you can > do with the following two functions: > > (defn get-lower [x] (tree-seq coll? identity x)) > > (defn get-maps-from-lower [x] (filter map? (get-lower x))). > > The first function gets all of the lower level colls, the second picks the > maps out of those colls. > > You then need a function that will rummage round in a coll x looking to > see if it has the relevant element r: > > (defn rummager [x r] (some #(= r %) x)) > > You then use rummager to get maps with the appropriate val > > (defn get-map-with-val [v x] > (first (filter #(rummager (vals %) v) (get-maps-from-lower x)))). > > Trying this out in the repl I get > > => (get-map-with-val {"id" "c"} s) > > {"d" 4, "n" {"id" "c"}, "children" nil} > > which I believe is the result you wanted. > > Alan
-- You received this message because you are subscribed to the Google Groups "Clojure" group. To post to this group, send email to clojure@googlegroups.com Note that posts from new members are moderated - please be patient with your first post. To unsubscribe from this group, send email to clojure+unsubscr...@googlegroups.com For more options, visit this group at http://groups.google.com/group/clojure?hl=en --- You received this message because you are subscribed to the Google Groups "Clojure" group. To unsubscribe from this group and stop receiving emails from it, send an email to clojure+unsubscr...@googlegroups.com. For more options, visit https://groups.google.com/d/optout.