Вытягивание значений из сложных списков в Clojure

Question

Я пытаюсь вывести значения из сложной структуры списка.

Учитывая то вроде этого:

[{:a "whatever" :b [:c "foo"]} :e {:f "boo"} :g {:h [:i 62281]}] 

Я хотел бы получить:

["whatever" "foo" "boo" 62281] 

До сих пор я только добрался до этой точки:

((62281) nil (boo) nil whatever foo) 

Вот код:

(defn get-values [params] 
    (apply conj 
     (map (fn [part] 
       (if (not (keyword? part)) 
        (map (fn [v] 
          (if (vector? v) 
           (last v) 
           v)) 
         (vals part)))) 
       params))) 

1. Я не могу избавиться от ноль-х
2. Я не могу понять, почему значения после определенного момента в списках.
3. Я полагаю, что это лучший способ сделать это.

Answer 1

Исправить структуру данных и все упадет на свои места. На данный момент ваша структура данных совсем несовместима, и это сделает любую функцию, которая будет касаться этих данных более сложной и подверженной ошибкам. Вы можете моделировать эти данные в виде карты:

(def data {:a "whatever" 
      :b nil 
      :c "foo" 
      :e nil 
      :f "boo" 
      :g nil 
      :h nil 
      :i 62281}) 

А затем, чтобы получить желаемый результат:

(->> (vals data) 
    (filter (comp not nil?)) 
    (into [])) 

Но по какой-то странной причине вы все еще хотите, чтобы проанализировать структуру данных, которую вы предоставили, то:

(defn get-values [data] 
    (->> (map #(if (map? %) (into [] %) %) data) 
     flatten 
     (filter #(or (string? %) (number? %))) 
     (into [])))