 
 (defn percentiles
   [values percentiles]
-  (let [p              (Percentile.)
-        _              (.setData p (double-array values))]
+  (let [p (Percentile.)
+        _ (.setData p (double-array values))]
     (mapv #(.evaluate p (double %)) percentiles)))
 
 (defn percentile
   [values percentile]
-  (let [p              (Percentile.)
-        _              (.setData p (double-array values))]
+  (let [p (Percentile.)
+        _ (.setData p (double-array values))]
     (.evaluate p (double percentile))))

(ns clojurewerkz.statistiker.statistics
  (:import [org.apache.commons.math3.stat.descriptive.rank Percentile])
  (:require [clojurewerkz.statistiker.fast-math :refer [sqrt pow]]))

(defn mean


(defn geometric-mean
  [values]
  (StatUtils/geometricMean (double-array values)))

(defn mode
  [values]
  (vec (StatUtils/mode (double-array values))))

(defn normalize
  [values]
  (vec (StatUtils/normalize (double-array values))))

(defn product
  [values]
  (StatUtils/product (double-array values)))

(def ^:private percentile-mappings
  {:min    1
