 (ns pca-test
   (:require [clojure.test :refer :all]
             [polismath.named-matrix :refer :all]
-            [incanter.core :refer :all]
+            [clojure.math.numeric-tower :refer :all]
+            [clojure.core.matrix :as m]
             [polismath.pca :refer :all]))
 
 

      (testing "from scratch"
               (is (almost-equal? (pc-from-start [1 1]) expected))))))



(deftest powerit
  (testing "Should generally work"
    (let [data (m/matrix [[ 1 0  0  ]
                        [-1 1  0.1]
                        [ 0 1  0.1]
                        [ 0 1 -0.1]])
