xf.clj

(let [atributo->item {:a {:atributo     :a
                          :selecionado? true}
                      :b {:atributo     :b
                          :selecionado? false}
                      :c {:atributo :c}}]
  {:reduce (reduce-kv (fn [acc k {:keys [selecionado?]}]
                        (if (false? selecionado?)
                          acc
                          (conj acc k)))
                      #{}
                      atributo->item)
   :for    (set (for [[k {:keys [selecionado?]}] atributo->item
                      :when (not (false? selecionado?))]
                  k))
   :xf     (into #{}
                 (comp (remove (comp false? :selecionado? val))
                       (map key))
                 atributo->item)})