sirherrbatka

(ql:quickload :cl-data-structures)

(defparameter *pseudo-generator*
  (cl-ds:xpr (:i 0)
    (when (< i 5)
      (cl-ds:send-recur i :i (1+ i)))))

(dotimes (k 6)
  (print (funcall *pseudo-generator*)))

sirherrbatka

(vellum.plot:visualize :plotly
                       (vellum.plot:stack *roc-frame*
                                          (vellum.plot:mapping :x 'fpr :y 'tpr)
                                          (vellum.plot:aesthetics :label "ROC")
                                          (vellum.plot:line))
                       "~/roc-plot.html")