将序列解开为重复元素序列(clojure)

aet*_*ter 10 clojure

在Clojure中,如何将序列划分为重复元素的子序列?例如:

[1 2 2 3 3 3 4 2 2 1 1 1]
Run Code Online (Sandbox Code Playgroud)

[[1] [2 2] [3 3 3] [4] [2 2] [1 1 1]]
Run Code Online (Sandbox Code Playgroud)

我一直在玩一些试图更好地理解clojure的例子,并且已经坚持了一段时间.

Bri*_*per 15

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]]
Run Code Online (Sandbox Code Playgroud)