            org.bson.types.ObjectId)
   (:use clj-excel.core))
 
-(mg/connect! {:host "192.168.1.184" :port 7017})
+(mg/connect!)
 
 (mg/set-db! (mg/get-db "xuetest"))
 

  (let [day (t/from-time-zone (apply t/date-time day) (t/time-zone-for-offset +8))
        next-day (t/plus (t/from-time-zone day (t/time-zone-for-offset +8)) (t/days 1))
        results (mc/aggregate collection [{$match {:date {$gte day
                                           $lt next-day}
                                                   :nature nature}}
                                          {$group {:_id {:word "$word"}
                                                   :counts {$sum 1}}}
                                          {$sort {:counts -1}}])
        func #()]
))


(heavy-words "mahang_segs" "形容词" [2014 4 5] 500)



            [monger.core :as mg];the following 4 is for mongo use
            [monger.collection :as mc]
            [monger.operators :refer :all]
            ;[monger.query :refer :all]
            [monger.joda-time :as mjt]
            [monger.multi.collection :as mmc]
            [data-mall.ansj-seg :as seg]
