forked from nextjournal/clerk
-
Notifications
You must be signed in to change notification settings - Fork 0
/
viewer_classes.clj
23 lines (21 loc) · 1.16 KB
/
viewer_classes.clj
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
(ns notebooks.viewer-classes
{:nextjournal.clerk/visibility {:code :hide}
:nextjournal.clerk/css-class [:justify-center :bg-slate-200 :dark:bg-slate-900 :py-8 :min-h-screen]}
(:require [nextjournal.clerk :as clerk]
[clojure.string :as str]))
(clerk/html
{::clerk/css-class [:border :rounded-lg :shadow-lg :bg-white :p-4 :max-w-2xl :mx-auto]
::clerk/width :wide}
[:div
(clerk/vl {:width 700 :height 400 :data {:url "https://vega.github.io/vega-datasets/data/us-10m.json"
:format {:type "topojson" :feature "counties"}}
:transform [{:lookup "id" :from {:data {:url "https://vega.github.io/vega-datasets/data/unemployment.tsv"}
:key "id" :fields ["rate"]}}]
:projection {:type "albersUsa"} :mark "geoshape" :encoding {:color {:field "rate" :type "quantitative"}}})])
^{::clerk/viewer clerk/table
::clerk/css-class [:max-w-2xl :mx-auto :bg-white :p-4 :rounded-lg :shadow-lg :mt-4]}
(def dataset
(->> (slurp "/usr/share/dict/words")
str/split-lines
(group-by (comp keyword str/upper-case str first))
(into (sorted-map))))