      [:recheck-graph? [true]]
      ]))
 
-(comment 
   (def *online* (experiment-set-results->dataset (read-experiment-set-results (make-online-experiment-set) "/Users/jawolfe/Desktop/")))
 
-  (plot (ds->chart (ds-derive (ds-fn [output] (- (second output))) (filter (ds-fn [ms instance-num max-primitives ref-level-map] (and ms (not ref-level-map) (= instance-num 9) (= max-primitives 5))) (filter (ds-fn [domain] (= domain :warehouse)) *online*)) :cost) [:algorithm :type :ref-choice ] :max-refs :cost {:ylog "t" :xlog "t" :key "7000, 6000"} {})) 
+  (plot (ds->chart (ds-derive (ds-fn [output] (- (or (second output) -20000))) (filter (ds-fn [ms instance-num max-primitives ref-level-map] (and ms (not ref-level-map) (= instance-num 9) (= max-primitives 5))) (filter (ds-fn [domain] (= domain :warehouse)) *online*)) :cost) [:algorithm :type :ref-choice ] :max-refs :cost {:ylog "t" :xlog "t" :key "7000, 6000"} {})) 
+ 
+  (plot (ds->chart (ds-derive (ds-fn [output] (- (or (second output) -20000))) (filter (ds-fn [ms size max-primitives ref-level-map] (and ms (not ref-level-map)  (not max-primitives) (= size 500))) (filter (ds-fn [domain] (= domain :nav-switch)) *online*)) :cost) [:algorithm :type :ref-choice ] :max-refs :cost {:ylog "t" :xlog "t" :key "7000, 6000"} {}))
 
   )
+
+(comment 
 
 (defn make-online-experiment-set2 []
   (make-aij-experiment-set "online-pretest2" 1000000

(defn make-aij-experiment-set [name max-seconds arg-spec]
  (experiments/make-experiment-set name
    arg-spec get-init-form get-solution-form
    'edu.berkeley.ai.scripts.z09-aij  10
     max-seconds 512 false experiments/*planning-experiment-result*))

; TODO: use simple valuations?!
; TODO: investigate AHLRTA* variations, ref-choice, etc.

(defn make-offline-experiment-set []
  (make-aij-experiment-set "offline-test" 1000

             [:product [:graph? [:bhaskara]] [:recheck-graph? [false]]]]
     ]))

    (def *online2* (experiment-set-results->dataset (read-experiment-set-results (make-online-experiment-set2) "/Users/jawolfe/Desktop/")))

  (plot (ds->chart (ds-derive (ds-fn [output] (- (or (second output) -10000))) (filter (ds-fn [ms instance-num ref-level-map] (and ms (not ref-level-map) (= instance-num 3))) (filter (ds-fn [domain] (= domain :warehouse)) *online2*)) :cost) [:algorithm :type :ref-choice :graph?] :max-refs :cost {:ylog "t" :xlog "t" :key "7000, 6000"} {}))
 

  )



(comment 
    (def *online2* (experiment-set-results->dataset (read-experiment-set-results (make-online-experiment-set2) "/Users/jawolfe/Desktop/")))

  (plot (ds->chart (ds-derive (ds-fn [output] (- (or (second output) -10000))) (filter (ds-fn [ms instance-num ref-level-map] (and ms (not ref-level-map) (= instance-num 3))) (filter (ds-fn [domain] (= domain :warehouse)) *online2*)) :cost) [:algorithm :type :ref-choice :graph?] :max-refs :cost {:ylog "t" :xlog "t" :key "7000, 6000"} {}))
 

  )

