       (catch IllegalArgumentException e
         (repeat (count attributes) 0)))))
 
-
 (def
   ^{:doc "force the collection of only the OLS coefficients and t-statistics
   from the `long-trend-general` function, since this is what we have used for

  [f window xs]
  (pmap f (partition window 1 xs)))

;; TODO: document this with examples

(defn make-monotonic
  [comparator coll]
  (reduce (fn [acc val]
            (conj acc

(defn whizbang
  "force whizbang into an output map where the tuple for the reference
  period is separate from the tuples for all other time periods -
  those time periods that are used for est(imation) ... `for-est`!.
  NOTE: the reference, start, and end period for estimation have to
  correspond to the element index from the start of the time-series.
  That is, the date string will have to already be passed through the
  datetime->period function in the date-time namespace.  For example,
  in our original application, the integer 71 (corresponding to Dec 2005)
  is passed in as `ref-pd`."
  [ref-pd start-pd end-pd t-series & cofactors]
  {:pre [(vector? t-series)
         (every? #{true} (vec (map vector? cofactors)))]}
