Clojurians Log v2

How do you define a map spec with keys of similar spec? e.g.:

(s/def potato-name string?)
(s/def potato-happiness number?)

;; This is a potato:
{:name "potato name"
 :happiness-1 12
 :happiness-2 54}

the idea behind spec is to give attributes global semantic meaning, by using namespaced attributes to differentiate and not do that