Öğeyi, iç içe geçmiş bir listeden veya Clojure'deki vektörden nasıl silebilirim?

Question

türüne göre iç içe geçmiş listesindeki öğeleri kaldırmak için bir yol var mı böyle (1 [2] 3 (4 [5] 6)) olur (1 3 (4 6)) Ben sadece vektörleri kaldırmak isterseniz? postwalk kullanma

, ben nil ile tüm vektörler yerine, ama onları kaldırmak için bir yol bulamıyorum.

(clojure.walk/postwalk 
    #(if (vector? %) nil %) '(1 [2] 3 (4 [5] 6))) 

=>(1 nil 3 (4 nil 6)) 

Answer 1

mükemmel olmaktan uzak

ama belki de iyi bir başlangıç: Burada

(clojure.walk/prewalk #(if (list? %) (remove vector? %) %) '(1 [2] 3 (4 [5] 6))) 

Answer 2

Ben clojure.walk kullanarak daha özlü çözüm görmek isterdim, ama bir özyinelemeli fonksiyon ve mapcat kullanan biri:

(defn remove-vectors [coll] 
    (mapcat 
    (fn [x] 
     (cond 
     (vector? x) nil 
     (coll? x) (list (remove-vectors x)) 
     :else (list x))) 
    coll)) 

ve kullanan bir filter ve map:

(defn remove-vectors [coll] 
    (map #(if (coll? %) (remove-vectors %) %) (remove vector? coll)))