gistfile1.clj

(defn offsets [perpage]
  (map #(* perpage %) (range)))

(defn events
  [{perpage :perpage offset :offset orderby :orderby}]
  (->> (client/get
        (str "https://api.meetup.com/2/events?page=" perpage
             "&offset=" offset
             "&orderby=" orderby
             "&status=upcoming,past&"
             "&group_urlname=" MEETUP_NAME
             "&key=" MEETUP_KEY)
        {:as :json})
       :body :results))
       
(defn all-events []
  (flatten
   (take-while seq
               (map #(events {:perpage 200 :offset % :orderby "name"}) (offsets 200)))))