你如何在Clojure的这个哈希表中添加？

我有一个文件哈希是这样一个参考：你如何在Clojure的这个哈希表中添加？

(def *document-hash* (ref (hash-map)))

它看起来像这样

{"documentid" {:term-detail {"term1" count1 ,"term2" count2}, "doclen" 33}}}

如何添加到这个哈希表现在我有

(defn add-doc-hash [docid term-number count] 
    (dosync (alter *document-hash* 
    (fn [a-hash] 
     (assoc a-hash docid {:term-detail 
     (assoc ((a-hash docid)) :term-detail) term-number count), :doclen 33))))))

？

我想更新文件的术语细节
每当一个新的学期来临的时候，我想获得长期，细节和更新方面，其计
最初哈希为空

但是，这将引发空指针异常，因为疗法项细节的散列当我尝试添加术语编号时未创建。

来源

2009-10-06 unj2

如果我正确理解这个问题，另一种表达问题的方法是： “我如何编写一个函数来向地图添加另一个[term，count]对。

一点辅助函数来获取当前信息的地图，如果没有添加该地图，那么显然它不会有任何的细节，所以我代表这一个空的地图
这能解决您的里添加问题第一项数：

(defn get-term-detail [a-hash docid] 
    (let [entry (a-hash docid)] 
    (if nil? entry) 
     {} 
     (:term-details entry))))

然后soemthing像：

(assoc a-hash docid {:term-details (assoc (get-term-detail a-hash docid) term-number count)  :doclen 33)

到实际工作中把它添加到哈希

来源

2009-10-06 21:22:10

user> (def x (ref {"documentid" {:term-detail {"term1" 1 ,"term2" 2}, "doclen" 33}})) 
#'user/x 
user> (dosync (alter x assoc-in ["documentid" :term-detail "term3"] 0)) 
{"documentid" {:term-detail {"term3" 0, "term1" 1, "term2" 2}, "doclen" 33}} 
user> (dosync (alter x update-in ["documentid" :term-detail "term3"] inc)) 
{"documentid" {:term-detail {"term3" 1, "term1" 1, "term2" 2}, "doclen" 33}}

来源

2009-10-06 21:38:19

也可以利用这一更新在创建节点的事实的优点：用户=>（更新在{} [：喜：妈妈]＃（如果％（INC％） 0）） - > {：hi {：mum 0}} – 2009-10-07 03:51:28

这是你应该工作的函数的重写。它使用assoc-in功能

(defn add-doc-hash [docid term-number count] 
    (dosync (alter *document-hash* assoc-in [docid :term-detail term-number] count)))

来源

2009-10-07 21:53:00

你如何在Clojure的这个哈希表中添加？

回答

相关问题