The Clojure core namespace contains many functions. One of the functions is the dedupe
function. This function can remove consecutive duplicates from a collection and returns a lazy sequence where only one of the duplicates remain. It will not remove all duplicate elements from the collection, but only when the element is directly followed by a duplicate element. The function returns a transducer when no argument is given.
In the following code sample we use the dedupe
function on several collections:
(ns mrhaki.core.dedupe (:require [clojure.test :refer [is]])) ;; In the following example we have the results ;; from several throws with a dice and we want ;; remove duplicates that are thrown after another. (is (= [1 5 6 2 3 1] (dedupe [1 5 5 6 2 3 3 1]))) ;; Only consecutive duplicates are removed. (is (= ["Clojure" "Groovy" "Java" "Clojure"] (dedupe ["Clojure" "Groovy" "Java" "Java" "Java" "Clojure"]))) ;; String is also a collection. (is (= [\a \b \c \d \e \f] (dedupe "aabccdeff"))) ;; For example a collection of mouse clicks where ;; we want to get rid of consecutive clicks at the same position. (is (= [{:x 1 :y 2} {:x 1 :y 1} {:x 0 :y 0}] (dedupe '({:x 1 :y 2} {:x 1 :y 1} {:x 1 :y 1} {:x 0 :y 0}))))
Written with Clojure 1.10.1.