Here we go, more generic solution:

(defn transform [data delimiter]
  (reduce (fn [acc [k v]]
    (let [key-strs (-> k (name) (str/split delimiter))]
      (assoc-in acc (mapv keyword key-strs) v))) {} s))


Dňa štvrtok, 16. januára 2014 14:46:46 UTC+1 James napísal(-a):
>
> Hello all,
>
> I've found myself stuck trying to move matching keys in a hash into a 
> nested hash.
>
> For example,:
>
> {:a--id 1 :a--name "A" :b--id 2 :b--name "B"} ;=> {:a {:id 1 :name "A"} :b 
> {:id 2 :name "B"}}
>
> I've tried `clojure.walk`, I've tried building the args to `assoc-in`, and 
> using `apply`. I honestly feel like I'm missing something really obvious, 
> like something with group-by.
>
> Any tips would be greatly appreciated. I'll keep hammering away.
>

-- 
-- 
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/groups/opt_out.

Reply via email to