clojure Renombrar-claves en la estructura anidada

Question

Supongamos que tengo una estructura anidada, algo como esto:

{:data1 
    {:categories [ 
     {:name "abc" :id 234 :desc "whatever"} 
     {:name "def" :id 456 :desc "nothing"}] 
    } 
    :data2 {...} 
    :data3 {...} 
} 

Y necesitan para transformar los nombres clave en los mapas. Puedo transformar las teclas de primer nivel así:

(rename-keys mymap {:data1 :d1}) 

Pero no estoy seguro de cómo cambiar el nombre llaves anidadas más profundamente en la estructura de datos (por ejemplo quiero cambiar el nombre de: Campo de la descripción a: descripción).

Estoy bastante seguro de que las cremalleras son la respuesta, pero no puedo entender cómo hacerlo, o si hay una manera más directa.

Answer 1

Igual que la solución de Brian Carper, excepto el espacio de nombres a pie ya tiene una función específica para este fin. Todas las claves en todos los niveles se cambian, ya sea que estén anidadas dentro de cualquier clase de colección o secuencia.

(:use 'clojure.walk) 

(def x 
    {:data1 
    {:categories 
    [{:desc "whatever", :name "abc", :id 234} 
    {:desc "nothing", :name "def", :id 456}]}, 
    :data2 
    {:categories 
    [{:desc "whatever", :name "abc", :id 234} 
    {:desc "nothing", :name "def", :id 456}]}}) 

(postwalk-replace {:desc :something} x) 

{:data1 
{:categories 
    [{:something "whatever", :name "abc", :id 234} 
    {:something "nothing", :name "def", :id 456}]}, 
:data2 
{:categories 
    [{:something "whatever", :name "abc", :id 234} 
    {:something "nothing", :name "def", :id 456}]}} 

Answer 2

Si desea cambiar el nombre de todas las claves :desc independientemente del nivel de anidación en el que se encuentren, esto podría funcionar. Si solo desea cambiar el nombre de las claves :desc a un cierto nivel de anidación, necesitará algo un poco más sofisticado.

Esto solo funciona porque clojure.set/rename-keys actualmente no hace nada (no devuelve su primer argumento) si su primer argumento no es un mapa.

user> (require '[clojure [set :as set] [walk :as walk]]) 
nil 

user> (def x {:data1 
       {:categories 
       [{:desc "whatever", :name "abc", :id 234} 
       {:desc "nothing", :name "def", :id 456}]}, 
       :data2 
       {:categories 
       [{:desc "whatever", :name "abc", :id 234} 
       {:desc "nothing", :name "def", :id 456}]}}) 
#'user/x 

user> (walk/postwalk #(set/rename-keys % {:desc :description :id :ID}) x) 
{:data1 
{:categories 
    [{:name "abc", :ID 234, :description "whatever"} 
    {:name "def", :ID 456, :description "nothing"}]}, 
:data2 
{:categories 
    [{:name "abc", :ID 234, :description "whatever"} 
    {:name "def", :ID 456, :description "nothing"}]}} 
nil 

Answer 3

postwalk es un mazo bastante pesado, en general, a pesar de lo que parece desde su pregunta original, como las que debe de estar. En muchos casos, puede realizar cambios en una estructura anidada con update-in:

user> (let [m {:foo {:deep {:bar 1 :baz 2}}}] 
     (update-in m [:foo :deep] clojure.set/rename-keys {:baz :periwinkle})) 
{:foo {:deep {:periwinkle 2, :bar 1}}}