 (def months (partial delta-periods month 1))
 (def sixteens (partial delta-periods ordinal 16))
 (def eights (partial delta-periods ordinal 8))
+(def ones (partial delta-periods ordinal 1))
 
 (defn periodize
   "Converts the supplied `org.joda.time.DateTime` object into a

  with a call to `(clj-time.format/show-formatters)`."
  [dt format]
  (->> dt (f/unparse (f/formatters format))))

(defn convert
  "Converts the supplied string `s` between the two supplied

;; proper temporal comparison of two unrelated datasets.

(ns forma.date-time
  (:use [clj-time.core :only (now date-time plus month year days)]
        [forma.matrix.utils :only (sparse-expander)]
        [forma.utils :only (inc-eq? all-unique? contains-nils?)])
  (:require [clj-time.core :as time]
