¿Cómo se usa sorted-map-by en Clojure?

Question

No puedo entender la documentación en absoluto.

Quiero un mapa ordenado "xxx", que ordena el mapa según el valor. ¿Cómo puedo hacer eso?

Gracias.

Answer 1

Utiliza ordenado-mapa-por especificando una comparación seguida de la clave-valor-pares. El comparador es una función que toma dos claves y devuelve -1, 0 o 1 dependiendo de si la primera clave es más pequeña que, igual o mayor que la segunda clave.

Ejemplo:

user=> (sorted-map-by (fn [k1 k2] (compare (mod k1 10) (mod k2 10))) 10 1 23 4 2 5) 
{10 1, 2 5, 23 4} 

Dado que la función comparisson sólo toma como argumentos claves, no se puede usar esto para la clasificación por los valores.

No hay forma de tener un mapa ordenado donde el mapa esté ordenado por los valores. Si fuera así, no sería posible encontrar una entrada por clave porque no podría usar la orden para determinar dónde está la entrada (ya que la orden no dependería de la clave).

Answer 2

Otra forma es comparar los valores del mapa original dentro de la función del comparador.

(def my-map {:chad 3 :bob 5 :sammy 4}) 

;; sort by keys ascending 
(into (sorted-map) my-map) 
=> {:bob 5, :chad 3, :sammy 4} 

;; sort by values ascending 
(into (sorted-map-by (fn [key1 key2] (compare (key1 my-map) (key2 my-map)))) my-map) 
=> {:chad 3, :sammy 4, :bob 5} 

;; sort by values descending 
(into (sorted-map-by (fn [key1 key2] (compare (key2 my-map) (key1 my-map)))) my-map) 
=> {:bob 5, :sammy 4, :chad 3}