figuring out how to create a heatmap in vega-lite

heatmap.clj

(ns heatmap
  (:require [nextjournal.clerk :as clerk]
            [aerial.hanami.common :as hc]
            [aerial.hanami.templates :as ht])
)

(defn heat-map-graph [title data]
  (hc/xform ht/heatmap-chart
            :TITLE title
            :DATA data
            :X "mu"
            :XTYPE "nominal"
            :Y "sd"
            :YTYPE "nominal"
            :COLOR {:field "ll" :type "quantitative" :title "Likelihood"}
            :YSCALE {:zero false}
            :XSCALE {:zero false}
            :TOOLTIP [{:field "ll" :title "Likelihood" :type "quantitative"}
                      {:field "mu" :type "quantitative"}
                      {:field "sd" :type "quantitative"}]))

ht/heatmap-chart


(heat-map-graph "" [])

(clerk/vl (heat-map-graph "testing"
                          (for [mu (range 0 40)
                                sd (range 0 40)
                                ]
                            {:mu mu
                             :sd sd
                             :ll (+ mu (* 40 sd))})))