clojure - 如何在 HTML 中漂亮地打印 Clojure 数据结构？

Question

如何使以下代码生成类似于 HTML 中的 pprint 的可视化？

(let [clj-structure {:ui {:selected #{[:A 3]}}                                                                                       
                           :domain                                                                                                         
                           {:C {0 {:value 12}}                                                                                             
                            :D {0 {:dependants [[:C 0]] :string "3" :value "3"}                                                            
                                1 {:dependants [[:C 0]] :string "4" :value "4"}}                                                           
                            :E {2 {:dependants [] :string "2" :value "2"}                                                                  
                                3 {:dependants [] :string "10" :value "10"}}}}]                                                            
        [:p (str clj-structure)])

Answer 1

(let [clj-structure {:ui {:selected #{[:A 3]}}                                                                                       
                           :domain                                                                                                         
                           {:C {0 {:value 12}}                                                                                             
                            :D {0 {:dependants [[:C 0]] :string "3" :value "3"}                                                            
                                1 {:dependants [[:C 0]] :string "4" :value "4"}}                                                           
                            :E {2 {:dependants [] :string "2" :value "2"}                                                                  
                                3 {:dependants [] :string "10" :value "10"}}}}]                                                            
        [:pre (with-out-str (cljs.pprint/pprint clj-structure))])