                    rigth       15
                    bottom      20
                    y-label     ""
+                   min-p       1
+                   max-p       1.1
                    fill        "orange"
                    over-fill   "rebeccapurple"}}]
 

                   bottom
                   x-value-fn
                   y-value-fn
                   y-label
                   title
                   description
                   fill

            (-> texts
                ;;(.style "text-anchor" "middle")
                (.attr "x" (fn [row]
                             (let [d (x-scale (y-value-fn row))]
                                   (+ 2 (if (< 1 d) d 1)))))                
                (.attr "y" #(+
                             (y-scale (x-value-fn %))
                             (/ (.rangeBand y-scale) 2)))
                (.text (fn [row]
                         (str
                          (if y-value-label-fn
                            (y-value-label-fn row)
                            (y-value-fn row))))))

            (-> texts
                .exit
