                      (map :year)
                      (apply min)))
 
-(def stop-year 2017) ;max-complete-year)
+(def stop-year max-complete-year)
 
 (def producing-field-names (->> parsed
                                 (filter #(= :producing (:status %)))

  (for [yr (range start-year (inc stop-year))]
    (produce-row-year yr :gas)))

(defn explode-row [row]
  (reduce (fn [o k]
            (conj o {:year  (:year row)

(def exploded-data-liquids-gboe
  (->> flat-data
       (mapcat explode-row)
       (map #(update % :value (fn [v] (double (* 6.29e-3 v)))))
       (sort-by :year)
       (vec)))

(def exploded-data-gas-gboe
  (->> flat-data-gas
       (mapcat explode-row)
       (map #(update % :value (fn [v] (double (* 6.29e-3 v)))))
       (sort-by :year)
       (vec)))