(->> my-family
(map #(update % :person/name str/upper-case))
(map #(update % :person/age inc))
(map :person/age)
(reduce +))
(into {}(map #((juxt :person/id identity) %) my-family))
(into {}(map #(assoc {} (:person/id %) %) my-family))