Desanudar una secuencia a secuencias de elementos repetitivos (clojure)

Question

En Clojure, ¿cómo se divide una secuencia en subsecuencias de elementos repetitivos? P.ej. :

[1 2 2 3 3 3 4 2 2 1 1 1] 

a

[[1] [2 2] [3 3 3] [4] [2 2] [1 1 1]] 

He estado jugando con algunos ejemplos que tratan de entender clojure mejor, y he quedado atrapado en esto desde hace algún tiempo.

Answer 1

user> (partition-by identity [1 2 2 3 3 3 4 2 2 1 1 1]) 
((1) (2 2) (3 3 3) (4) (2 2) (1 1 1)) 

user> (vec (map vec (partition-by identity [1 2 2 3 3 3 4 2 2 1 1 1]))) 
[[1] [2 2] [3 3 3] [4] [2 2] [1 1 1]] 

Answer 2

(mapa (recuento Juxt primero) (partición por identidad [1 1 1 3 2 2]))

((3 1) (1 3) (2 2))

¡Tres uno, luego uno tres, seguidos por dos pares!