example of lazy-seq in Clojure

example.clj

user> (defn page-search
  [search-term & {:keys [page page-size] :or {page 0 page-size 100}}]
  (case page
    0  {:items  ["page zero"]}
    1  {:items  ["page one"]}
    2  {:items  ["page two"]}
    nil))
#'user/page-search
user> (defn lazy-page-search
  [search-term & {:keys [page page-size] :or {page 0 page-size 100}}]
  (lazy-seq
   (let [{items :items} (page-search search-term :page page :page-size page-size)]
     (when (seq items)
       (cons items
             (lazy-page-search
              search-term
              :page (inc page)
              :page-size page-size))))))
#'user/lazy-page-search
user> (take 1 (lazy-page-search "test"))
(["page zero"])