如何创建此哈希图？

Question

基本上我想做的是打印一个包含键的哈希表，这些键是字符串中的字符，并且这些键的值为1。例如，字符串“ aabbce”应提供字典{：a 1：b 1：c 1 }。以下是我的尝试，但只显示空的哈希图

(defn isValid [s]
    (def dict {})

    (map (fn [x] ((assoc dict :x 1))) (seq s))

    (println dict)

)

Answer 1

另一种方法是：

(zipmap (map (comp keyword str) "abc") (repeat 1))

;;=> { :a 1 :b 1 :c 1 }